package QStat; BEGIN { print "Compiling QStat!\n"; } sub foo {} 1; #### Compiling QStat! Compiling QStat! Subroutine foo redefined at QStat.pm line 7.