/contrib/dialog/samples/copifuncs/copi.ifreq1
Perl | 20 lines | 1 code | 2 blank | 17 comment | 0 complexity | 735333d63abf04085158b92d7d0fc060 MD5 | raw file
Possible License(s): MPL-2.0-no-copyleft-exception, BSD-3-Clause, LGPL-2.0, LGPL-2.1, BSD-2-Clause, 0BSD, JSON, AGPL-1.0, GPL-2.0
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