Help for this page
my $counter = 0; my $generator = sub { ++$counter }; ... while (1) { print $generator->(); }
my $gimme_an_A = sub { 'a' }; while (1) { print $gimme_an_A->(); }
www.com | www.net | www.org
No recent polls found