http://www.perlmonks.org?node_id=1051298


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