use strict;
use warnings;
my @lines;
foreach my $file ( reverse @ARGV ) {
    open my $fh, '<', $file or die "Bleah: $!";
    my( @slurp ) = <$fh>;
    push @lines, reverse @slurp;
    close $fh;
}

print foreach @lines;