Your question makes no sense to me, but here's one observation:

open (FILE,"$ARGV[0]") or die;
@list =<FILE>;
close (FILE);
my $f =join ("",@list);
my @t = split ("\n",$f);
[download]

What is the point of doing that? @t will be exactly the same as @list except the newlines are removed, which they are more easily, efficiently, and clearly removed with chomp().

Also: indent your code. You may think this is an irrelevant or spurious criticism now, but unless you give up programming, you will change your mind very soon.