Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
binmode STDOUT, ":utf8";
binmode STDERR, ":utf8";
my $data = "\x{263a}xxx" . chr(0x05d0) . "\x{20ac}"; diag($data);
  2. or download this
    Wide character in print at /usr/share/perl/5.8/Test/Builder.pm line 12
+75.
# unicode characters here
# No tests run!