Select Code to Download

use strict;
use warnings;
...
}

print Dumper( %hash );

Output
$VAR1 = 'ID';
...
            3
          ]
        ];