copi.ifreq1

来自「This version of dialog, formerly known a」· IFREQ1 代码 · 共 21 行

#!/usr/bin/perl
$ver = "0.4";
#
# this perl script is designed for the ifmail package by eugene grosser.
#
# request a file (first argument) from a fido-node (second argument),
# don't forget to quote if you use wildcards, e.g.:

#      ifreq 'files*' 2:2410/305
# or
#      ifreq 'files newfile' 2:2410/305
#
# this perl script does only add an entry to the corresponding flo-file,
# the mailer ifcico is not started!
#
# rasca, berlin 1994 ([e-mail], 2:2410/305.4)
#
# multi-zone support added by
# Roland Rosenfeld 15.05.1994 ([e-mail], 2:2450/300.13)