I think you mean:
grep_file($_) for @ARGV; [download]
In reply to Re^2: Question on File Handler and Subroutines in Perl by tobyink in thread Question on File Handler and Subroutines in Perl by Anonymous Monk