in reply to the try/catch example from "Programming Perl" analyzed

Code should read:
sub try (&$) { ...
In my version of Programming Perl (3rd Ed.) this is on pp. 227-8.