Help for this page
#!/usr/bin/perl -w use strict; ... MainLoop; __END__
#!/usr/bin/perl -w ... } __END__