perl -wc A.pm