Help for this page

Select Code to Download

Select or download this

sub foo (&) {
    my ($sub) = @_;
...
foo {
    ...
};