perl: многомерный массив путем объединения нескольких одномерных массивов

Question

У меня есть несколько одномерных массивов as-

@p=(0,1,1,2);
@q=(0,1,3,4);
@r=(0,2,1,5);

Теперь мне нужно создать многомерный массив, который содержит несколько массивов, в том числе написанных выше.

my @array =   (
    'a' => [ 800  ],     #Written manually
    'b' => [ 'A', 'B' ], #Written manually
    'c' => 101,          #Written manually


    'p' => [0,1,1,2],  #Need to bring from the @p  
    'q' => [0,1,3,4],  #Need to bring from the @q
    'r' => [0,2,1,5],  #Need to bring from the @r
);

Внутри @array, 'a', 'b', 'c' написано вручную (или уже доступно).Теперь, как я могу взять эти @p, @q и @r и поместить их в @array, чтобы сформировать необходимый многомерный массив?