Help for this page
my $foo = "Hello there" for (1 .. 3);
sub blah { ... print $foo++,$/; } blah(),blah(),blah();