Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re: Simplest Possible Way To Disable Unicode

by Anonymous Monk
on Sep 02, 2011 at 06:16 UTC ( #923768=note: print w/ replies, xml ) Need Help??


in reply to Simplest Possible Way To Disable Unicode

@JapanIsShinto: I've been in your boat today wearing your shoes.

I recently upgraded Perl and now some of the scripts that I've been running have been dying with the dreaded "Wide character in syswrite at blahblah.pl line nnnn." message.

In one particular case I was using LWP::Simple's get() method to retrieve an image (note: an image is binary data) and write it to disk. Previously this was working with...

my $content = get($url); # other stuff... die "Could not write: $filename\n$!" unless open(my $fdOut, '>', $file +name); binmode($fdOut); syswrite($fdOut, $content, length($content)); close($fdOut);

Oh so simple and oh so effective. Enter Unicode... grumble.

Contrary to all the comments I can see on this thread... sometimes a string of bytes is just a string of bytes. Neither Perl nor anything else should be trying to interpret it as a string of characters. In the end, the solution was using Encode::_utf8_off() like the following...

use Encoding; my $content = get($url); Encode::_utf8_off($content); # other stuff... die "Could not write: $filename\n$!" unless open(my $fdOut, '>', $file +name); binmode($fdOut); syswrite($fdOut, $content, length($content)); close($fdOut);

Hope this helps...


Comment on Re: Simplest Possible Way To Disable Unicode
Select or Download Code
Re^2: Simplest Possible Way To Disable Unicode
by Anonymous Monk on Sep 04, 2011 at 07:46 UTC

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://923768]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (8)
As of 2014-12-25 17:26 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (161 votes), past polls