如何在Perl中创建多维数组?

我对Perl有点新鲜,但这里是我想做的:
my @array2d;
while(<FILE>){
  push(@array2d[$i],$_);
}

它不编译,因为@ array2d [$ i]不是数组,而是标量值。

我应该如何将@ array2d声明为数组?

当然,我不知道我有多少行。

解决方法

要创建数组数组,或者更准确地说,一个arrayrefs的数组,可以尝试这样:
my @array = ();
foreach my $i ( 0 .. 10 ) {
  foreach my $j ( 0 .. 10 ) {
    push @{ $array[$i] },$j;
  }
}

它将值推送给您的取消引用的arrayref。您应该可以访问这样的条目:

print $array[3][2];

相关文章

忍不住在 PerlChina 邮件列表中盘点了一下 Perl 里的 Web 应用框架(巧的是 PerlBuzz 最近也有一篇相关...
bless有两个参数:对象的引用、类的名称。 类的名称是一个字符串,代表了类的类型信息,这是理解bless的...
gb2312转Utf的方法: use Encode; my $str = "中文"; $str_cnsoftware = encode("utf-8...
  perl 计算硬盘利用率, 以%来查看硬盘资源是否存在IO消耗cpu资源情况; 部份代码参考了iostat源码;...
1 简单变量 Perl 的 Hello World 是怎么写的呢?请看下面的程序: #!/usr/bin/perl print "Hello W...
本文介绍Perl的Perl的简单语法,包括基本输入输出、分支循环控制结构、函数、常用系统调用和文件操作,...