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. 29 30