我正在使用 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, $_]
}