Help for this page
#!/usr/bin/perl ... print $string
use utf8; use open ':std' => ':utf8'; utf8::encode($string);