Encode::decode() clears scalar being decoded?

[Robert Urban]

if I run the following script:

-snip-
#!/usr/bin/perl

use Encode qw/decode/;

my $string = "B\303\266rsen Feiertag";
print "string=[$string]\n";

my $tmp = decode('utf8', $string, 1);
print "string=[$string], tmp=[$tmp]\n";
-snip-

I get the following output:

-snip-
string=[Börsen Feiertag]
string=[], tmp=[B?sen Feiertag]
-snip-


What happened to $string? There is no mention of side-effects in the Encode
manpage... This only happens when CHECK is set to 1.

cheers,

Rob Urban

 

[Ben Bullock]

if I run the following script:

-snip-
#!/usr/bin/perl

use Encode qw/decode/;

my $string = "B\303\266rsen Feiertag";
print "string=[$string]\n";

my $tmp = decode('utf8', $string, 1);
print "string=[$string], tmp=[$tmp]\n";
-snip-

I get the following output:

-snip-
string=[Börsen Feiertag]
string=[], tmp=[B?sen Feiertag]
-snip-

I get the same result.

I think it's a bug in Encode.