Select Code to Download

my $producer= "";

...
print Dumper @{$records};

close(REMEDY_DATA);

$VAR1 = {
          'Truck_Rolls' => 0,
...
$VAR158 = $VAR1;
$VAR159 = $VAR1;
$VAR160 = $VAR1;