人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

Shift-jis形式のファイルでperlのエンコードプログラムを作っています。

#!/usr/bin/perl
$fuji = "フジテレビ";
$asahi = "テレビ朝日";

$fuji =~ s/([^\w ])/'%' . unpack('H2', $fuji)/eg;
$asahi =~ s/([^\w ])/'%' . unpack('H2', $asahi)/eg;

print $fuji;
print $asahi;

エンコードされるのですが、エンコードされた結果をデコードするとフジテレビは「フジテャビ」、テレビ朝日は「テャビャャ」となってしまいます。正しくデコードするためにはどこを修正すればよろしいでしょうか?解説URLの紹介ではなく、上記プログラムについて添削していただける方のみご回答ください。

●質問者: kuretakajun
●カテゴリ:インターネット ウェブ制作
✍キーワード:H2 JIS Perl print URL
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● GEN111
●60ポイント
$fuji =~ s/([^\w ])/'%' . unpack('H2', $1)/eg ;
$asahi =~ s/([^\w ])/'%' . unpack('H2', $1)/eg ;

これで試してみてください。

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ