package UNIVERSAL; 

sub AUTOLOAD{print $AUTOLOAD};

package main;

Test();
&{'Just another Perl Hacker'}();