#!perl -w
use strict;
use 5.010;
use Devel::Optrace -all;
foreach my $i(reverse 1, 2){
say $i;
}
foreach (10){
say;
}
#!perl -w
use strict;
use 5.010;
use Devel::Optrace -all;
foreach my $i(reverse 1, 2){
say $i;
}
foreach (10){
say;
}