Select Code to Download

my $file;
{
...
   local $/;
   $file = <$fh>;
}

use strict;
use warnings;
...
...

my @tokens = $parser->tokenize($file);