perl /home/lanx/perl/pm/check_stash_sub.pl
Warning: Foo::try() will be shadowed by feature 'try' at /home/lanx/perl/pm/check_stash_sub.pl line 23.
Warning: Foo::catch() will be shadowed by feature 'try' at /home/lanx/perl/pm/check_stash_sub.pl line 23.
Warning: Foo::finally() will be shadowed by feature 'try' at /home/lanx/perl/pm/check_stash_sub.pl line 23.