$foo{'bar'} is an array reference so the assignment to the array is:

@{$foo{'bar'}} = ($i, $j, $k);
[download]

The code then prints:

$foo = {
         'bar' => [
                    #0
                    '1',
                    #1
                    '2',
                    #2
                    '3'
                  ]
       };
[download]