Help for this page
#TestBegin.pm use strict; ... BEGIN in the program -e in the program -e
perl -e "print qq(in the program $0\n);BEGIN{print qq(BEGIN in the pr +ogram\n)}use TestBegin;" ... in the module TestBegin.pm in the program -e