$ perl main.pl 
ModuleB::BEGIN
ModuleA::BEGIN
main::BEGIN