[EMAIL PROTECTED] wrote: > > This script gives me nothing: > > #!/usr/bin/perl -F/\t/ -ap > > print @F[14 .. 17] if $F[0] eq "H" and $F[5] = 1816; ^ > print @F[14 .. 17] if $F[0] eq "H" and $F[5] = 5380; ^ > print @F[14 .. 17] if $F[0] eq "H" and $F[5] = 5370; ^ ^ You are _assigning_ numbers to $F[5] not testing for equality.
print @F[14 .. 17] if $F[0] eq "H" and $F[5] == 1816; > The file is indeed tab delimited, and the sixth field should have a number > in it the line starts with a 'H'. When I run this script in debug mode, > there is nothing in the array @F. John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]