What you probably want to do is create an array of arrays, or else a hash of arrays. Something like:

our @array;
our %hash;
my $i = 0;
foreach my $f (@ARGV) {
  open(F,"< $f")
    or die "Couldn't open '$f': $!\n";
  my @lines = <F>;

  # This is how to store the lines into an array
  $array[$i] = \@lines;

  # And this is how to store them into a hash.
  $hash{"array$i"} = \@lines;

  $i++;
}
[download]