Help for this page

Select Code to Download

Select or download this

my @files = @ARGV;
for my $fn (@files) {
...
        print OUTPUT $_;
    }
}