06-16-2010
How to append records to a file using PERL
Hi All,
Great Forum and Great help. Keep up the good work.
My question is what is the command and it's syntax to append a record to an output file using PERL. Please provide the command syntax.
In regular shell you can use the '>>' to append.
Basically, I am creating a small report and I want to write the records out (Each record) to an output file, which I can then email.
Thanks
Nurani
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
I have a flat file and need to count no of records in the file less the header and the trailer record.
I would appreciate any and all asistance
Thanks
Hadi Lalani (2 Replies)
Discussion started by: guiguy
2 Replies
2. Shell Programming and Scripting
Hi,
I have a file .. file.txt .. i need to get a total record count in the files into a $variable.. im using perl script
thanks (4 Replies)
Discussion started by: meghana
4 Replies
3. UNIX for Dummies Questions & Answers
Hi all,
I am new to unix shell scripting and I am trying to append batch number that comes in Trailer record to the detailed record.
TR|20080312|22881 |000000005|20080319|2202
LN|20080312|077777722220 |0000100000017|ABS
LN|20080312|000799439326 |0000709943937|AA
TR|20080313|22897 ... (6 Replies)
Discussion started by: kiran_418
6 Replies
4. Shell Programming and Scripting
Hi All,
I am writing a Perl script such that the output from "perl myscript.pl file1" to be appended to another file name called file2.
I tried out with the below code but couldn't work.
Can any expert give me some advice?
open(OUTPUT, 'perl myscript.pl file1 |');
close OUTPUT;... (7 Replies)
Discussion started by: Raynon
7 Replies
5. Shell Programming and Scripting
hi all , i have a requirement like this..
this just a sample script...
$ cat test.sh
#!/bin/bash
perl -e '
open(IN,"addrss");
open(out,">>addrss");
@newval;
while (<IN>)
{
@col_val=split(/:/);
if ($.==1)
{
for($i=0;$i<=$#col_val;$i++)
{
... (2 Replies)
Discussion started by: tprayush
2 Replies
6. UNIX for Dummies Questions & Answers
Hi everyone.
I am a newbie to Linux stuff. I have this kind of problem which couldn't solve alone. I have a text file with records separated by empty lines like this:
ID: 20
Name: X
Age: 19
ID: 21
Name: Z
ID: 22
Email: xxx@yahoo.com
Name: Y
Age: 19
I want to grep records that... (4 Replies)
Discussion started by: Atrisa
4 Replies
7. Shell Programming and Scripting
Dear All,
I want search two lines and append some string in between these lines.
Input file
tmp,123
,10:123
tmp,666
,50:999
tmp,2:19800
5,3:21.
tmp,2:19800
55555555
tmp,2:19800
5,3:21.Output should be
tmp,123
,10:123
tmp,666
,50:999
tmp,2:19800 (4 Replies)
Discussion started by: arvindng
4 Replies
8. UNIX for Dummies Questions & Answers
I did some searches, but couldn't really find what I'm looking for. I have a file formatted as below:
BOF ABC CO - XYZ COMM DATA OF 07/05/2011
EBA00000001 sdfa rtyus uyml
EBB00000001 54682 984w3
EBA00000002 mkiyuasdf 98234
I want to pull the date from the header record and add it... (4 Replies)
Discussion started by: keeferb
4 Replies
9. Shell Programming and Scripting
I have 2 files
"File 1" is delimited by ";" and "File 2" is delimited by "|".
File 1 below (3 record shown):
Doc1;03/01/2012;New York;6 Main Street;Mr. Smith 1;Mr. Jones
Doc2;03/01/2012;Syracuse;876 Broadway;John Davis;Barbara Lull
Doc3;03/01/2012;Buffalo;779 Old Windy Road;Charles... (2 Replies)
Discussion started by: vestport
2 Replies
10. Shell Programming and Scripting
Hi I am new to shell programming in unix
Please if I can provide help.
I have a file structure of a header record and "N" detail records.
The header record will be the total number of detail records
I need to split the file in 2:
One for the header
Another for all detail records
Could... (1 Reply)
Discussion started by: jamcogar
1 Replies
LEARN ABOUT DEBIAN
mail::verify
Mail::Verify(3pm) User Contributed Perl Documentation Mail::Verify(3pm)
NAME
Mail::Verify - Utility to verify an email address
SYNOPSIS
use Mail::Verify;
DESCRIPTION
"Mail::Verify" provides a function CheckAddress function for verifying email addresses. First the syntax of the email address is checked,
then it verifies that there is at least one valid MX server accepting email for the domain. Using Net::DNS and IO::Socket a list of MX
records (or, falling back on a hosts A record) are checked to make sure at least one SMTP server is accepting connections.
ERRORS
Here are a list of return codes and what they mean:
0 The email address appears to be valid.
1 No email address was supplied.
2 There is a syntaxical error in the email address.
3 There are no DNS entries for the host in question (no MX records or A records).
4 There are no live SMTP servers accepting connections for this email address.
EXAMPLES
This example shows obtaining an email address from a form field and verifying it.
use CGI qw/:standard/;
use Mail::Verify;
my $q = new CGI;
[...]
my $email = $q->param("emailaddr");
my $email_ck = Mail::Verify::CheckAddress( $email );
if( $email_ck ) {
print '<h1>Form input error: Invalid email address.</h1>';
}
[...]
perl v5.8.8 2002-06-09 Mail::Verify(3pm)