Help for this page
1: sub DESTROY { print "stick a fork in '$_[0]' it's done\n" } 2: ... we've left $bar's lexical scope stick a fork in 'main=ARRAY(0x80fbb0c)' it's done stick a fork in 'main=HASH(0x80fbbf0)' it's done
1: { 2: my $foo = "a string"; ... $foo: [a string] $foo: []
1: { 2: my $foo = "a string"; ... $foo: [a string] $foo: [a string]
1: { 2: my $cnt = 5; ... 2 1 BOOM!
1: sub counter { 2: my $cnt = shift; ... 2 1 BOOM!
1: use IO::Dir; 2: ... example3.pl example4.pl example7.pl
1: use strict; 2: use warnings; ... 67: 68: return $self; 69: }
www.com | www.net | www.org
No recent polls found