JcodeとEncode

utf8　→　sjis　に変換

------------　

use Jcode;
$str = "テスト元の文字コードは utf8'";
print $str;
Jcode::convert( $str , "sjis", "utf8" );
print $str;

-----------

use Encode;
$str = "テスト元の文字コードは utf8'";
print $str;
Encode::from_to($str, 'utf8', 'shiftjis');
print $str;