Perl初心者スレ（マジレス回答）

[377 デフォルトの名無しさん 2015/08/31(月) 13:31:30.24 ID:Q0xjlAqa]

ごめん、アクセス方法も書かなきゃね。

#!/usr/bin/perl

my @car = (1, 2);
my @cdr = (3, 4);
my @both = ( \@car, \@cdr);
print("$both[0]->[0]\n");
print("$both[0]->[1]\n");
print("$both[1]->[0]\n");
print("$both[1]->[1]\n");