Debug::Phases is a Perl module to announce BEGIN and INIT phases to help locate problems.
# Your code here
> perl -MDebug::Phases your_script
This tiny module does nothing but announce the start of the BEGIN and INIT phases, recording how long the compilation (BEGIN phase) took. It's handy for tracking down whether particular problems are compile-time or run-time, and also for evaluating the time-cost for using other modules.
None. It simply prints its information to STDERR.
Your script is currently in its BEGIN phase
Compiling...%s seconds. Running...
Your script just finished its compile phase (in the indicated time) and is now executing.