if this is closer to what you want:

$HASH1 = {
           a => [
                  1,
                  2
                ],
           b => [
                  1,
                  3
                ],
           c => [
                  2,
                  0
                ]
         };
[download]

I used Data::Dump::Streamer to output that, with the following code:

use Data::Dump::Streamer;
$hoa = {a => [1,2],  'b'=>[1,3], c=> [2,0]};
print Dump($hoa);
 print "\n";
[download]