Apple

I don’t have a way to test this here, but won’t it accept a reference to your in and out scalars?

$decoder->decode(\$in, \$out);

Hey Marc,

No, it doesn't like that at all... :)

#!/usr/bin/env perl -sw

use MIME::Decoder;

my ($textInput, $textOutput);

$textInput = q(

FIND/REPLACE:

~s/=E2=80=9D|=E2=80=9C/\"/g;

~s/=E2=80=98|=E2=80=99/\'/g;

~s/=E2=80=93/\--/g;

~s/=E2=80=A6/\.../g;

);

$decoder = new MIME::Decoder 'quoted-printable' or die "unsupported";

$decoder->decode(\$textInput, \$textOutput);

print $textOutput;

Error:

Can't call method "getline" on unblessed reference at /opt/local/lib/perl5/vendor_perl/5.24/MIME/Decoder/QuotedPrint.pm line 112.

References:
	>Quoted-Printable Perl Module (From: Christopher Stone <email@hidden>)
	>Re: Quoted-Printable Perl Module (From: debt <email@hidden>)