/contrib/dialog/samples/copifuncs/copi.ifman1

https://bitbucket.org/freebsd/freebsd-head/ · Perl · 29 lines · 0 code · 1 blank · 28 comment · 0 complexity · 63b9ef7779b7906fee64d6caa701cb5d MD5 · raw file

  1. #! /usr/bin/perl
  2. #
  3. # This is a utility script to manipulate Fidonet-related issues
  4. # using Eugene Crosser's ifmail package
  5. #
  6. # Version 0.1
  7. #
  8. # (C) Michael Bravo and The Communication Tube, 1994
  9. #
  10. # You can do whatever you want with this script. I take no responsibility
  11. # whatsoever in anything related to this script. If you make some useful
  12. # additions to this, please think of sending them to me so I could partake
  13. # of your wisdom.
  14. #
  15. # This script was written to help attaching and requesting files from the
  16. # commandline, much like you do with Squish under DOS or OS/2. It is certainly
  17. # not perfect - I used it as an exercise in Perl. It also probably lacks
  18. # some other useful features, like ability to specify trunc/sent or kill/sent
  19. # attributes etc etc. If you really want this or some other features
  20. # implemented, write me at mbravo@tctube.spb.su or mbravo@octopus.spb.su
  21. # and I will try to do what I can.
  22. #
  23. # Note - files don't get copied to any spool dir, so if you move attached
  24. # files somewhere, they won't get sent.
  25. #
  26. # This script is supposed to read ifmail's config to determine where outbound
  27. # directory and logfile are. The only two parameters to modify in most cases
  28. # are below.