方法一
my @person1 = ("zdd", 30, "man") ;
my @person2 = ("autumn", 27, "woman") ;
my @persons =(\@person1, \@person2) ;
方法二
my @persons =(
["zdd", 30, "man"],
["autumn", 27, "woman"]
) ;
方法三 匿名数组,这个方法需要用特殊的访问方法。
my $persons =[
["zdd", 30, "man"],
["autumn", 27, "woman"]