Not tested
While (<file>){
my @record = split /\|/;
next unless ($record[6]); # go to next line if all 7 fields are
not populated
.....
}
Unless I am misunderstanding what you are trying to do that should work.
I don't get why you would want to skip the first and second lines
though.
However if they are not records the code above will have them skipped.
-----Original Message-----
From: LoneWolf [mailto:[EMAIL PROTECTED]
Sent: Wednesday, September 10, 2003 5:04 PM
To: [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]
Subject: CUt first and last line from a file (DATA)
GARNOR|09/10/03
GARNOR|141023|BUDDY|Y54321|[EMAIL PROTECTED]|Y|Y
GARNOR|141033|BUDD|Y5432|[EMAIL PROTECTED]|Y|Y
GARNOR|141043|BUD|Y5432|[EMAIL PROTECTED]|Y|Y
GARNOR|141053|BU|Y54|[EMAIL PROTECTED]|Y|Y
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]