Select Code to Download

use Data::Dumper;
print Dumper({
...
  1195 => "World",
  1007 => "Hello",
});

$VAR1 = {
          1195 => 'World',
...
          1007 => 'Hello',
          1195 => 'World'
        };