Select Code to Download

FF: binmode ARGV;
while(<>)
...
{ if(eof)
   { close ARGV; goto FF; }
}

FF: binmode ARGV;
while(<>)
...
{ if(eof)
   { close ARGV; goto FF; }
}

while(<>)
{
...
    print $_=<>;
    close BINMODE;
}