# grep each file for my $FNAME (@ARGV) { if ( ! -r $FNAME ) { printf STDERR "Cannot read: $FNAME\n" ; next ; } open ($INFILE, "<$FNAME") ;