Help for this page
#!/usr/bin/perl -w # ... } }
#!perl ... sub OnQuit { Win32::OLE->QuitMessageLoop; }