Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

UTF 16 encoding problems

by jrvd (Novice)
on Jul 05, 2013 at 14:55 UTC ( #1042728=perlquestion: print w/ replies, xml ) Need Help??
jrvd has asked for the wisdom of the Perl Monks concerning the following question:

Hello monks!

Edit: I found the solution. I needed to use '>:raw:encoding(UTF-16)' ;)

So I am building a text file that will be imported with a bulk insert into SQL Server. However, since I am using french langage characters, I need the file to be encoded in UTF-16.

Here is what I am doing (this isn't the entire code, just the relevant parts):

my $fileDest = "hostsfile_modified.txt"; die "Problème de création du fichier $fileDest" unless open(my $fd, '> +:encoding(UTF-16)', $fileDest); my $line = ""; #I build my $line... print $fd $line."\n"; close $fd;

Once this is done however, my output document looks something like this:
10.10.10.70;VL-CX-RP002;RP;CX;SRIP-R;Internet (TPIA)
਀㄀ ⸀㄀㔀㐀⸀㈀⸀㐀㬀嘀䰀ⴀ儀䈀䌀刀ⴀ匀圀  ㄀㬀匀圀㬀儀䈀䌀刀㬀匀刀䤀倀ⴀ刀㬀嘀匀䐀⼀匀䐀嘀ഊ10.154.10.53;VL-VTTV-SW001;SW;VTTV;SRIP-R;VSD/SDV
਀㄀ ⸀㄀ ⸀㈀㐀⸀㤀㜀㬀嘀䰀ⴀ䴀匀ⴀ䔀儀 ㌀㄀㬀䔀儀㬀䴀匀㬀匀刀䤀倀ⴀ䄀㬀ഊ10.10.20.52;VL-MS-EQ033;EQ;MS;SRIP-A;
਀㄀ ⸀㄀ ⸀㈀㐀⸀㤀㠀㬀嘀䰀ⴀ䴀匀ⴀ䔀儀㄀㌀㄀㬀䔀儀㬀䴀匀㬀匀刀䤀倀ⴀ䄀㬀ഊ10.10.20.53;VL-MS-EQ133;EQ;MS;SRIP-A;
...

I realize that the problem seems to be the new line character however I am not sure what the solution is. Thanks for your help!

jrvd

Comment on UTF 16 encoding problems
Download Code
Re: UTF 16 encoding problems
by Jim (Curate) on Jul 06, 2013 at 01:18 UTC

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://1042728]
Front-paged by Arunbear
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (14)
As of 2014-09-19 15:34 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (142 votes), past polls