>perl -wMstrict -le
"printf 'This is the package => %s <=', __PACKAGE__;
"
This is the package => main <=