package A; BEGIN { print "compiling A\n" } print "executing A\n"; 1;