Select Code to Download

my %hash;
for($i=0;$i<=$#arr0;$i++)
...
#print $#arr1;
   $hash{$arr1[0]} = $arr1[1];
}

...

close(OUT);