use vars qw/&MainLoop/;