fork(1) download
  1. #!/usr/bin/perl
  2. use utf8;
  3. use strict;
  4. use warnings;
  5.  
  6. my $process = qq(\x{2013});
  7. $process =~ s/\\x\{[0-9]+\}//sg ;
  8. print $process;
Success #stdin #stdout #stderr 0s 6176KB
stdin
Standard input is empty
stdout
stderr
Wide character in print at prog.pl line 8.