Select Code to Download

#!/usr/bin/perl --
use strict;
...
  CUR = 3
  LEN = 0

$ perl -le "use Data::Dump; use utf8; dd qq{é}"
Malformed UTF-8 character (1 byte, need 3, after start byte 0xe9) at -
+e line 1.
...

$ perl -le "use Data::Dump; dd qq{é}"
"\xE9"