use A; use commonRoutine; do ('LogMe.pl'); sub enter{ A->new; commonRoutine->new; }