lsmgen.sh
上传用户:xxcykj
上传日期:2007-01-04
资源大小:727k
文件大小:1k
源码类别:

Email客户端

开发平台:

Unix_Linux

  1. #!/usr/bin/perl
  2. #
  3. # lsmgen.sh -- generate current LSM for fetchmail
  4. #
  5. $version = $ARGV[0];
  6. $size = substr($ARGV[1], 0, 3);
  7. $wwwhost = $ENV{'WWWVIRTUAL'};
  8. @months
  9.   = ('JAN','FEB','MAR','APR','MAY','JUN','JUL','AUG','SEP','OCT','NOV','DEC');
  10. my($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
  11. $month = $months[$mon];
  12. $century = 19 + int($year / 100);
  13. print <<EOF;
  14. Begin3
  15. Title: fetchmail
  16. Version: $version
  17. Entered-date: ${mday}${month}${century}${year}
  18. Description: Full-featured IMAP/POP2/POP3/APOP/RPOP/KPOP client with GUI
  19. configuration, daemon mode, forwarding via SMTP or local MDA,
  20. superior reply handling, support for multidrop mailboxes. 
  21. Not a mail user agent, rather a pipe-fitting that seamlessly
  22. forwards fetched mail to your local delivery system. 
  23. Your one-stop solution for intermittent email connections.
  24. Home page and FAQ at http://$wwwhost/~esr/fetchmail.
  25. Keywords: mail, client, POP, POP2, POP3, APOP, RPOP, KPOP, IMAP, ETRN,
  26.      SMTP, RPA, NTLM.
  27. Author:  esr@snark.thyrsus.com (Eric S. Raymond)
  28. Primary-site: locke.ccil.org /pub/esr/fetchmail
  29. ${size}K fetchmail-$version.tar.gz
  30. Platforms: All
  31. Copying-policy: GPL
  32. End
  33. EOF