トレース表示
Devel::Traceモジュールを使います。
利用する際は-dオプションで指定します。
perl -d:Trace foo.plサンプルスクリプト(foo.pl)。
use strict;
foreach my $i (0..1) {
	print $i, "\n";
}
 実行結果。
>> foo.pl:3: foreach my $i (0..1) {
>> foo.pl:4:    print $i, "\n";
0
>> foo.pl:4:    print $i, "\n";
1