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