Select Code to Download

{ 
   one => [ [ 1, 2 ], 3 ];
   ...
}

{ 
   one => [ [ [ 1, 2 ], 3 ], 4 ];
   ...
}

{ 
    one => '1 2 3 4',
    ...
}

#!/usr/bin/perl -w
 use strict;
...
     $h1{ $x } .=  ' ' . $h2{ $x };
 }
 print Dumper (\%h1);

#!/usr/bin/perl -w
 use strict;
...
     $h1{ $x } .=  $; . $h2{ $x };
 }
 print Dumper (\%h1);