Can't call method "catch" without a package or object reference at perltest.pl line 5.