Re^2: Writing unicode characters to file using open($fh, ">:utf8, $name) mangles unicode?

Thank you, that makes perfect sense. It is supposed to be transparent and here I was doing it twice :-)

But what if I download a web page, say LWP::UserAgent->get($url), and save it in a file in its native encoding, and this is not listed in Encode->encodings(':all') - am I stuck? :-)

-- tel

Comment on Re^2: Writing unicode characters to file using open($fh, ">:utf8, $name) mangles unicode? Download Code

Replies are listed 'Best First'.
Re^3: Writing unicode characters to file using open($fh, ">:utf8, $name) mangles unicode? by ikegami (Patriarch) on Aug 08, 2007 at 17:32 UTC
I'm not sure what you are asking. If you want to save the document in its original encoding: `open(my $fh, '>', $filename);` doesn't do any encoding. If you don't do any decoding, `print $fh $raw;` will save the content in its native encoding. If you want to save the document in UTF-8: Yeah, you're screwed. If Encode "doesn't speak the language", you won't be able to decode the content, so you're left with a bunch of meaningless octets.	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^3: Writing unicode characters to file using open($fh, ">:utf8, $name) mangles unicode?
by ikegami (Patriarch) on Aug 08, 2007 at 17:32 UTC

I'm not sure what you are asking.

If you want to save the document in its original encoding: open(my $fh, '>', $filename); doesn't do any encoding. If you don't do any decoding, print $fh $raw; will save the content in its native encoding.

If you want to save the document in UTF-8:

Yeah, you're screwed. If Encode "doesn't speak the language", you won't be able to decode the content, so you're left with a bunch of meaningless octets.

[reply]
[d/l]
[select]