BEGIN {
    *MainLoop = \&MainLoop;
}

##</code><code>##

use vars qw/&MainLoop/;