Help for this page

Select Code to Download


  1. or download this
    use feature 'say';
binmode STDOUT, 'encoding(utf-8)';
...

say $ok ? 'ok' : 'not ok';
say $str;
  2. or download this
    ok
Code point 0x10000000 is not Unicode, may not be portable at demo.pl l
+ine 8.
"\x{10000000}" does not map to utf8 at demo.pl line 8.
\x{10000000}
  3. or download this
    my $ok = utf8::decode($json);
Dump( $json );