my @grid = map @$_, ( [ '01' .. '12' ] ) x 12;