Re^2: Prototype "foo {...} bar {...}" is documented?

Yes, is documented with this example:

    sub try (&@) {
    my($try,$catch) = @_;
    eval { &$try };
    if ($@) {
        local $_ = $@;
        &$catch;
    }
    }
    sub catch (&) { $_[0] }

    try {
    die "phooey";
    } catch {
    /phooey/ and print "unphooey\n";
    };
[download]

Thanks I missed that.

Graciliano M. P.
"Creativity is the expression of liberty".

Comment on Re^2: Prototype "foo {...} bar {...}" is documented? Download Code