平成30/ 2018-10-21 05:31
perl 文字コード置換
use Jcode;
$sql = Jcode->new( $sql, "sjis")->utf8;

でうまくいった。

use Escape;はうまくいかなかった。

(参考)
http://webcache.googleusercontent.com/search?q=cache:w6bpyMTvUtwJ:perl.g.hatena.ne.jp/tetsu23/20060224/p2+Perl%E3%80%80%E6%96%87%E5%AD%97%E3%82%B3%E3%83%BC%E3%83%89%E3%80%80%E5%A4%89%E6%8F%9B&cd=1&hl=ja&ct=clnk&gl=jp&source=www.google.co.jp