我该如何访问这个项目？

Question

我正在使用Data :: Dumper。我的代码是：

use Data::Dumper;
blah, blah, blah.....
print Dumper \@data;

我的输出是：

$VAR1 = [
      [
        'Dave',
        'Green',
        '5',
      ],
      [
        'Bob',
        'Yellow',
        '4',
      ]
    ];

如何访问'Bob'或'5'？另外，如何将@data转换为哈希值或变量，以便将整个内容放入数据库？

编辑：@data是通过读取文件内容创建的：

while (<PARSE>) {
    push @data, [unpack $template, $_]
}

Answer 1

#!/usr/bin/env perl

use strict;
use warnings;

my @data = ( [ 'Dave', 'Green', '5', ], [ 'Bob', 'Yellow', '4', ] );
print $data[0]->[2], "\n";  # 5
print $data[1]->[0], "\n";  # Bob

@data是一个数组数组。哈希由密钥和相应的值组成。为了将数组转换为散列，您必须将其中一个元素指定为键，其余部分指定值。

注意

替代语法：

$data[0]->[1]相当于$data[0][1]。

参见

• perldoc perldsc - Perl Data Structures Cookbook
• perldoc perlreftut - 马克关于参考文献的简短教程

<强>致谢：

Bill Ruppert 和 Joel 。