Help for this page

Select Code to Download


  1. or download this
    use Devel::Peek;
my $str = "\x{20AC}";
...
  CUR = 3
  LEN = 10
  COW_REFCNT = 1
  2. or download this
    use Data::Dump;
my $str = "\x{20AC}";
dd $str, utf8::is_utf8($str);
__END__
("\x{20AC}", 1)