$ perl test.pl $VAR1 = { '1250' => 'dddd', '957' => 'cccc', '1103' => 'bbbb', '2667' => 'aaaa' }; $VAR1 = [];