use strict; use warnings; use MyTest; while () { chomp; print "MAIN: >$_<\n"; } #MyTest::run(); while () { chomp; print "MAIN: >$_<\n"; } __DATA__ 32 wilma 16