Just in case you're curious... If you wanted to stick with your original code as closely as possible, here's how you'd have to modify it to get it working as desired (I wouldn't recommend it though):
my @filesnames = @ARGV; for my $input_file ( @filesnames ) { eof(); while ( ! eof ) { print scalar <>; } print "=========SEPARATOR: Processing $input_file =========\n"; }
In reply to Re: eof not recognised when applying diamond operator to invocation arguments?
by Anonyrnous Monk
in thread eof not recognised when applying diamond operator to invocation arguments?
by pat_mc
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |