Select Code to Download

use strict;
use warnings;
...
print Dumper \%stuff_from_file;

close IN;

$VAR1 = {
          'ul' => [
...
                     '324.00'
                   ]
        };