perl的多维数组
我想用Perl将数据推送到多维数组中 例如perl的多维数组,perl,perl-module,perl-data-structures,Perl,Perl Module,Perl Data Structures,我想用Perl将数据推送到多维数组中 例如质量清单[i][j] 使用: 但是,我想,我不能用它。你能帮我一下吗 @se1s = ('1','5','8'); @se2s = ('3','2','4'); sub test() { foreach $se1(@se1s) { foreach $se2(@se2s) { push(@quality_list, $se1, $se2); } } } 我期望: quality_list[1][0] = 1 q
质量清单[i][j]
使用:
但是,我想,我不能用它。你能帮我一下吗
@se1s = ('1','5','8');
@se2s = ('3','2','4');
sub test()
{
foreach $se1(@se1s)
{
foreach $se2(@se2s)
{
push(@quality_list, $se1, $se2);
}
}
}
我期望:
quality_list[1][0] = 1
quality_list[1][1] = 3
quality_list[2][0] = 5
quality_list[2][1] = 2
你想要什么还不太清楚。但这似乎得到了你所要求的结果
#!/usr/bin/perl
use strict;
use warnings;
use 5.010;
use Data::Dumper;
my @se1s = ('1','5','8');
my @se2s = ('3','2','4');
my @quality_list;
foreach (0 .. $#se1s) {
push @{$quality_list[1]}, $se1s[$_];
push @{$quality_list[2]}, $se2s[$_];
}
say Dumper \@quality_list;
我认为阅读“”对你很有用。你想要什么还不清楚。但这似乎得到了你所要求的结果
#!/usr/bin/perl
use strict;
use warnings;
use 5.010;
use Data::Dumper;
my @se1s = ('1','5','8');
my @se2s = ('3','2','4');
my @quality_list;
foreach (0 .. $#se1s) {
push @{$quality_list[1]}, $se1s[$_];
push @{$quality_list[2]}, $se2s[$_];
}
say Dumper \@quality_list;
我认为阅读“”将对您非常有用。提供一个包含输入和预期输出的可运行示例。请参阅修订版。您的数组从零开始。
@quality_list
的第一行是什么?提供一个包含输入和预期输出的可运行示例。请参阅修订版。数组从零开始。@quality\u list
的第一行应该是什么?