Support for character encoding in Perl scripts

# Enable the Perl program to support utf8 wide character encoding. If you do not add the following lines to print Chinese characters, the wide character in print warning or error will appear.
Use utf8;
Binmode (stdin, ': encoding (utf8 )');
Binmode (stdout, ': encoding (utf8 )');
Binmode (stderr, ': encoding (utf8 )');
When a Perl script processes characters such as Chinese characters, sometimes the data read from the file is a bytecode and must be decoded before it can be correctly displayed. Use the encode module for processing.
Use encode;
# $ Str1 indicates the data obtained from UTF-8 encoded data stored in a file or database.
My $ str0 = decode ("utf8", $ str1 );