Select Code to Download

use strict;
use warnings;
use Data::Dumper;
...
                    => $_ } 
                   @test_data;
print Dumper [values %unique];

$VAR1 = [
          {
            'ab' => 12
          }
        ];