[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

[FWP] Tool



I redirected mail to an alternate account while my machine was down
lately.  To resend all those messages, all I needed was:

perl -0777 -ne 'for (split /(?=^From )/m) { open(S, "|sendmail gnat\@frii.com"); print S $_ }' $MAIL

Life with Perl is good.

Nat

==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe