Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister


by mikeirw (Pilgrim)
on Jun 11, 2002 at 15:45 UTC ( #173524=sourcecode: print w/ replies, xml ) Need Help??

Category: Utility Scripts
Author/Contact Info Mike Irwin -

I needed to view the contents of a nnml mail directory, but didn't have access to Emacs or Gnus, so I whipped up this simple script to allow me to use mail -f instead. I must say that I'm a Perl newbie, so it may need some work. If so, I'll appreciate any comments.

A quick note: I did not include any code to match Gcc'ed emails (which doesn't generate a From header), so you may need to add that before running.

#!/usr/bin/perl -w
# Turn a Gnus nnml file into mbox format.  Prints to STDOUT.
# Usage: nnml2mbox files ...

use strict;
use File::Find;

my @nnml_files;
find sub {
    push @nnml_files, $File::Find::name
      if /^\d+/;
}, @ARGV;
@ARGV = @nnml_files;
while (<>) {

Comment on nnml2mbox
Download Code
Replies are listed 'Best First'.
Re: nnml2mbox
by fundflow (Chaplain) on Jun 15, 2002 at 09:57 UTC
    Just to be on the safe side, you might do the following change:
      Good suggestion, fundflow. I went ahead and updated the code.

Back to Code Catacombs

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: sourcecode [id://173524]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (5)
As of 2015-11-26 01:25 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (695 votes), past polls