shift-jisをＵＴＦ－８に読み込ませるには？
shift-jisにてcsv形式で保存しているテキストファイルの配列（カンマ区切りの３番目）から取り出したものをＵＴＦ－８にエンコードする方法をご教示賜りたくご質問させて頂きました。
$Pscrtfl = "./datas/pdtscrt.txt";
open (DT,"<$Pscrtfl");
@Pscrt = <DT>;
close (DT);
foreach $i (@Pscrt){
@iW = split(/\,/,$i);
$Pscrtfl = "./datas/pdtscrt.txt のｔｘｔに入ってる３番目のデータを取り出して、それをＵＴＦ－８文字コードに
変換して出力させたいと思っております。
現在のところ私のやってみたこと
foreach(@Pscrt){
use Encode;
Encode::from_to( $_, 'utf8', 'shiftjis' );
$Pscrtfl .= $_;
}
とエンコードかけてみるんですが。。。。やはりｃｓｖファイルの文字がＵＴＦ－８に変更していないのか、
<!doctype html>
<html><head><meta charset="UTF-8">でｐｒｉｎｔしようとすると、やはり文字化けしてしまいます。
これを文字化けしない方法がお分かりの方おられましたら、ぜひご教示下さいませ。
