Help for this page

Select Code to Download

Select or download this

use Encode  qw( decode FB_CROAK );

...

my $s_chars = eval { decode('UTF-8', $s_utf8, FB_CROAK) };
print("valid decode = ", defined($s_chars)?1:0,"\n");

Select or download this
```
utf8::valid = 1
valid decode = 0
```