1#!/usr/bin/perl 2$ver = "0.4"; 3# 4# this perl script is designed for the ifmail package by eugene grosser. 5# 6# request a file (first argument) from a fido-node (second argument), 7# don't forget to quote if you use wildcards, e.g.: 8 9# ifreq 'files*' 2:2410/305 10# or 11# ifreq 'files newfile' 2:2410/305 12# 13# this perl script does only add an entry to the corresponding flo-file, 14# the mailer ifcico is not started! 15# 16# rasca, berlin 1994 (rasca@marie.physik.tu-berlin.de, 2:2410/305.4) 17# 18# multi-zone support added by 19# Roland Rosenfeld 15.05.1994 (roland@p13.flokiste.fido.de, 2:2450/300.13) 20 21