in reply to Closure confusion in Tkx
for ( my $x = 1 ; $x < 4; $x++ ) { my $i = $x; push @cfor, sub { warn "cfor: \ti=$i \tx=$x" }; } [download]
Cheers Rolf (addicted to the Perl Programming Language :) Wikisyntax for the Monastery FootballPerl is like chess, only without the dice