Select Code to Download

use warnings;
use strict;
...
$Data::Dumper::Indent = 3;
print Dumper \%line;
}

$VAR1 = {
          '1.00' => {
...
                                 ]
                    }
        };