in reply to evaluation strategy of perl

What you have inadvertantly created is called a closure. When you create a subroutine, all lexical (my) variables in the parent scope are made available to the subroutine. Event if they are no longer around when the routine is later called. Essentially, perl keeps a reference to the lexical variable associated with the routine. In your case a references to $i. When you call the routine it uses the current value of $i -- 3.
Try this variation an see the difference:
my @d; for (my $i = 0; $i<3; $i++) { my $j=$i; push @d, sub { print "$j\n" }; }
In this case since $j is created with each iteration of the loop, each of the closures will have a reference to a different copy of $j.
This should give you the right output (although not what you were expecting- 0,1,2; not 1,2,3)
You can find out all about closures in chapter 8 of the Camel book, or by searching the Monastery.

Hope it helps,

-pete
"Pain heals. Chicks dig scars. Glory lasts forever."