Problem with MIME/QuotedPrint.pm since update to mailscanner-4.40.11-1

[Martin Wozenilek]

    [ The following text is in the "ISO-8859-1" character set. ]
    [ Your display is set for the "US-ASCII" character set.  ]
    [ Some characters may be displayed incorrectly. ]

Enviroment:
Fedora Core 2
mailscanner-4.40.11-1
Perl 5.8.3
spamassassin-3.0.1-0

Of course this is a perl problem ... but since i've updated to
mailscanner-4.40.11-1 i have a problem when i call sa-learn from
spamassassin. I get always the following error:

Use of uninitialized value in numeric ge (>=) at
/usr/lib/perl5/site_perl/5.8.3/MIME/QuotedPrint.pm line 77.

The corresponding code in QuotedPrint.pm is here:

use vars qw(@ISA $VERSION);
use MIME::Decoder;
use MIME::QuotedPrint;

@ISA = qw(MIME::Decoder);

# The package version, both in 1.23 style *and* usable by MakeMaker:
$VERSION = "5.417";

#------------------------------
# If we have MIME::QuotedPrint 3.03 or later, use the three-argument
# version.  If we have an earlier version of MIME::QuotedPrint, we
# may get the wrong results.  However, on some systems (RH Linux,
# for example), MIME::QuotedPrint is part of the Perl package and
# upgrading it separately breaks their magic auto-update tools.
# We are supporting older versions of MIME::QuotedPrint even though
# they may give incorrect results simply because it's too painful
# for many people to upgrade.

# The following code is horrible.  I know.  Beat me up. --dfs
BEGIN {
    if (!defined(&encode_qp_threearg)) {
        if ($::MIME::QuotedPrint::VERSION >= 3.03) {
            eval 'sub encode_qp_threearg ( $$$ ) { encode_qp(shift,
shift, shift); }';
        } else {
            eval 'sub encode_qp_threearg ( $$$ ) { encode_qp(shift); }';
        }
    }
}

I'm not a perl expert. But the variable $::MIME::QuotedPrint::VERSION
seems not to be defined anywhere in the code. Or is this a perl system
variable? The other thing I don't understand:
/usr/lib/perl5/site_perl/5.8.3/MIME/QuotedPrint.pm is linked to
/usr/lib/perl5/site_perl/5.8.3/MIME/Decoder/QuotedPrint.pm. And this is
version 5.417. When the script knows that it is 5.417 why this "if bla
bla bla >= 3.03 eval bla bla bla" code?

This problem does not exist before the update. Does anybody else have
this problem also?

Thanks for your help!

--
Martin Wozenilek
Am Langberg 91a
21033 Hamburg
mailto: mail at wozenilek.de
PGP-Key-ID: 0x00105C52


--
This message has been scanned for viruses and
dangerous content by MailScanner, and is
believed to be clean.

------------------------ MailScanner list ------------------------
To unsubscribe, email jiscmail at jiscmail.ac.uk with the words:
'leave mailscanner' in the body of the email.
Before posting, read the Wiki (http://wiki.mailscanner.info/) and
the archives (http://www.jiscmail.ac.uk/lists/mailscanner.html).

Support MailScanner development - buy the book off the website!