Select Code to Download

date             1
Account          19
...
   .
   .
   .

my %hash = (); my @array = (); my $no = 0;
while (<$Fields>)
...
    $array[$no] = $key;
    $no++;
}