[EMAIL PROTECTED] writes:
> I just want to know if there's a simple shell command to delete
> duplicate mail messages. i just merged a big pile of archives together.
> Now I need to clean it up.
I haven't tested this much but this might do the trick:
perl -0\nFrom\ -ne '/\nmessage-id: (\S+)?\n/is; $m{$1} = $_; END { print join "\n",
values(%m);} ' your-mail-box-files(s) > uniq-mailbox-file
Gosh, I hope that Ben doesn't flame me for using a long line here.... (-:
--kevin
--
Kevin D. Clark (cetaceannetworks.com!kclark) | Will hack Perl for
Cetacean Networks, Inc. | fine food, good beer,
Portsmouth, N.H. (USA) | or fun.
alumni.unh.edu!kclark (PGP Key Available) |
**********************************************************
To unsubscribe from this list, send mail to
[EMAIL PROTECTED] with the following text in the
*body* (*not* the subject line) of the letter:
unsubscribe gnhlug
**********************************************************
