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

[Julian Field]

    [ 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. ]

Try upgrading to the latest MIME::Base64 module with CPAN.

perl -MCPAN -e shell
install MIME::Base64


Martin Wozenilek wrote:

>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!
>
>
>

--
Julian Field
www.MailScanner.info
Buy the MailScanner book at www.MailScanner.info/store
Professional Support Services at www.MailScanner.biz
MailScanner thanks transtec Computers for their support

PGP footprint: EE81 D763 3DB0 0BFD E1DC 7222 11F6 5947 1415 B654

------------------------ 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!