diff -up cleanfeed-20020501/cleanfeed.ro cleanfeed-20020501/cleanfeed --- cleanfeed-20020501/cleanfeed.ro 2008-08-06 16:13:16.000000000 -0400 +++ cleanfeed-20020501/cleanfeed 2008-08-06 16:14:13.000000000 -0400 @@ -518,7 +518,8 @@ sub filter_art { if (defined $hdr{__LINES__}) { $lines = $hdr{__LINES__}; } else { - $lines = ($hdr{__BODY__} =~ tr/\n//); + $tmp12 = $hdr{'__BODY__'}; + $lines = ($tmp12 =~ tr/\n//); } # lowercase some headers for later