#!/usr/bin/perl use strict; use warnings; my @i = (2..5); for my $i (@i) { $i ++; print "foo"; print " $i\n"; } =head running under debug: >perl -d pl_test\test{{.pl Loading DB routines from perl5db.pl version 1.28 Editor support available. Enter h or `h h' for help, or `perldoc perldebug' for more help. main::(pl_test\test{{.pl:5): 5: my @i = (2..5); DB<1> {{ # DB<2> s main::(pl_test\test{{.pl:7): 7: for my $i (@i) { auto(-1) DB<2> # DB<2> s ... DB<2> {{ pre-debugger commands: {{ -- # DB<3> s foomain::(pl_test\test{{.pl:10): 10: print " $i\n"; auto(-1) DB<3> # DB<3> { * All { actions cleared. DB<4> ... continue normally =cut