A little weak, but:
CHECK{exit;} print "Just another Perl hacker,\n";