RE: printing the header with Mail::internet

2003-03-12 Thread Dan Muey
I got it myself, thank you cpan. Thanks list for listening to me whine. replace() add() $mail->replace('Content-Type',"text/plain\n\tcharset=\"iso-8859-1\"\n"); $mail->print_header(); Thanks Dan > > Let me redo this since the last bit was overly complicated. > > I need to do this : > > 1)

printing the header with Mail::internet

2003-03-12 Thread Dan Muey
Let me redo this since the last bit was overly complicated. I need to do this : 1) get the header form STDIN 2) modify one field ( content-type ) 3) print the new header to STDOUT in the original order or some way that doesn't screw it up like a 'foreach $keys' does #1 works! my $mail = Mail::