我该如何访问这个项目？

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 - Mark关于参考文献的简短教程

致谢:

比尔鲁珀特和乔尔.