$FullHeaders = "";
$DecodedHeaders = "";
$switch = "";
+$inctype = 0;
while(<>) {
chop;
$FullHeaders .= "$_\n";
+ if ( /^\s+/ && $inctype ) {
+ next;
+ }
+
+ $inctype=0;
+
if( /^Content-Transfer-Encoding: BASE64/i ) {
$isEncoded = 1;
$isEncoded = 1;
$switch = "-q"; # quoted-printable
+ } elsif( /^Content-Type: /i ) {
+ $inctype = 1;
+
} elsif( ! /^Mime-Version: /i && ! /Content-Type: /i ) {
$DecodedHeaders .= "$_\n";
}