Select Code to Download

package TestTry;
use strict;
...
}

1;

# trytest.pl - a simple test of new perl 5.38 try syntax:
# Put TestTry.pm in same dir as trytest.pl and run with:
...
do_one(13);
do_one(42);
print "trytest: end\n";

$ perl -I . trytest.pl
TestTry: module load
...
TestTry::life end
trytest: in finally block
trytest: end