Help for this page
# A.pm package A; ... } 1;
#!/usr/bin/perl # A.pl ... use A; A->usage;
$ ./A.pl This is usage()