On 7/11/07, Chas Owens <[EMAIL PROTECTED]> wrote: snip
my $rec = '';
while (<>) {
if (/\\$/) { #if line is a continuation
chop; #remove the continuation character
$rec .= $_;
next;
}
my @rec = split ' ', $rec;
$rec = '';
#do stuff with @rec
}
snip
Whoops, left out a chomp after the while. The chop won't work correctly without it. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
