Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Re^3: pack mangles utf output

by vsespb (Chaplain)
on Aug 28, 2013 at 15:50 UTC ( #1051298=note: print w/ replies, xml ) Need Help??


in reply to Re^2: pack mangles utf output
in thread pack mangles utf output

Yep, perl-5.8.9 under Linux affected
$ perlbrew exec --with perl-5.8.9 perl -MDevel::Peek -e 'use utf8; Dump pack 'A20', "FREIGHT  INTRASTATE"'
perl-5.8.9
==========
SV = PV(0x1d14100) at 0x1d11350
  REFCNT = 1
  FLAGS = (PADTMP,POK,pPOK)
  PV = 0x1d69870 "FREIGHT \342\200\223 INTRASTA"\0
  CUR = 20
  LEN = 32


$ perlbrew exec --with perl-5.10.0 perl -MDevel::Peek -e 'use utf8; Dump pack 'A20', "FREIGHT  INTRASTATE"'
perl-5.10.0
==========
SV = PV(0x1773098) at 0x178e288
  REFCNT = 1
  FLAGS = (PADTMP,POK,pPOK,UTF8)
  PV = 0x1798ca0 "FREIGHT \342\200\223 INTRASTATE"\0 UTF8 "FREIGHT \x{2013} INTRASTATE"
  CUR = 22
  LEN = 32

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (5)
As of 2016-08-28 12:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    The best thing I ever won in a lottery was:















    Results (392 votes). Check out past polls.