Help for this page
#!/usr/bin/perl -w use MIME::Entity; ... open (MAIL,"|/usr/sbin/sendmail -t -oi"); $top->print(\*MAIL); close MAIL;
use MIME::Parser; ... return $content; }
perl strip.pl