这是我的Perl代码为什么一个小循环中的大循环比大循环中的小循环更快?
$big=10_000_000;
#A:big loop outside
my $begin_time = time;
foreach my $i (1..$big) {
foreach my $p (1..10){
}
}
my $end_time = time;
my $t1=$end_time-$begin_time;
#B:small loop outside
my $begin_time = time;
foreach my $i (1..10){
foreach my $p (1..$big){
}
}
my $end_time = time;
my $t2=$end_time-$begin_time;
#output
print $t1;
print "\n";
print $t2;
T1 =8秒
T2 =3秒
利用Mathematica代码:
Timing[Do[2, {i, 1, 10}, {j, 2*1, 10^7}]]
output:{14.328, Null}
Timing[Do[2, {j, 1, 2*10^7}, {i, 1, 10}]]
output:{30.937, Null}
为什么大环外需要更多时间?
'perl -MO =简明script.pl'在第一种情况下给出了更多的操作码。 –
我的母语不是英语,但你理解我的意思非常好!感谢您的编辑 – cn8341
应该指出,如果你在循环中做了一些真正的计算,性能可能会非常好地反转 - 不要得出一个清晰的结论由此。 – agentp