Select Code to Download

GetOptions( \%options, 'server=s', 'date=s', 
           'man', 'help', 'alert!', 'debug+'
          ) || pod2usage(2);

#!/ms/dist/perl5/bin/perl5.10
# A one-line description of what this script does.
...
# End of File
# ====================================================================
+==