Select Code to Download

    push @TestVals, {
        A => $var1,
...
        print Dumper $row;
    
    }

    $VAR1 = {
          'A' => 'TEST DATA 1',
...
          'D' => 'TEST DATA 4',
        };