use strict;
use warnings;

I->can(print"Just Another Perl Hacker")