[ic] MIME::Lite error with UTF-8 enabled
Stefan Hornburg
racke at linuxia.de
Thu Mar 5 11:40:02 UTC 2009
Hello,
one of my catalogs is running current Interchange from CVS and UTF-8 enabled
as follows:
Variable MV_UTF8 1
Variable MV_HTTP_CHARSET utf-8
AllowGlobal fshop
PerlAlwaysGlobal fshop
Sometimes the mail compostion with MIME::Lite bails out as follows:
/cgi-bin/f-shop/checkout Runtime error: Wide character in subroutine entry at /home/interchange/perl/lib/site_perl/5.10.0/MIME/Lite.pm line 2259.
/^QUOTED-PRINTABLE$/ and do {
### UNTAINT since m//mg on tainted data loops forever:
my ($untainted) = ( $self->{Data} =~ m/\A(.*)\Z/s );
### Encode it line by line:
while ( $untainted =~ m{^(.*[\r\n]*)}smg ) {
### have to do it line by line...
my $line = $1; # copy to avoid weird bug; rt 39334
2259>> $out->print( encode_qp($line) );
}
last DATA;
Any ideas what might causing this problem?
Regards
Racke
--
LinuXia Systems => http://www.linuxia.de/
Expert Interchange Consulting and System Administration
ICDEVGROUP => http://www.icdevgroup.org/
Interchange Development Team
More information about the interchange-users
mailing list