[Perl] 解決 Wide character in print with UTF-8 mode

print 出中文資料會出現 “Wide character in print at” 的 warning 訊息
解決方法在表頭加上以下。

use utf8;
binmode(STDIN, ':encoding(utf8)');
binmode(STDOUT, ':encoding(utf8)');
binmode(STDERR, ':encoding(utf8)');