use Perl

• Similar to what I have (Score:1)

  by Aristotle (5147)

  Nine is quite a bit more elaborate though. Notable differences:

  sysopen my $fh, $fn, O_WRONLY | O_EXCL | O_CREAT
      or die "Couldn't open $fn for writing: $!\n";

  so I don't get stuff inadvertantly overwritten. Also,

  for( $msg->parts ) {
      my $fn = $_->filename;
      next if not defined $fn;
      # ...
  }

  so I don't have to look at MIME types that way only seemed to lead to madness. (What're you passing a parameter to ->filename() for btw?)

  Other reaso
  • Re:Similar to what I have (Score:1)

    by Aristotle (5147) <pagaltzis@gmx.de> on 2004.11.02 16:24 (#35710) Homepage Journal

    In fact my code was closer to completion than I thought. Go take a look if you will. [perlmonks.org] Thanks for inspiring me to finish this up. :-)

    Reply to This

    Parent