Perlコーディング初心者質問スレ Part 67
Perlのコーディングで困ってる人のスレです。
【投稿する際の注意】
質問するときは内容をよく吟味してから投稿してください。
「コマンドの意味がわかんない」とかはマニュアル見ましょう。
回答者さんは何でも屋じゃありません。
1： 自分はこういう事がしたい。
2： それでこんな風にやってみたが･･･
3： こんなエラーが出て上手く行かなかった。
最低でも1と3が無いと誰も答えられないよ。
良い回答は良い質問から。一緒に勉強しましょう。
お勧めサイトは >>2 以降
前スレ http://kohada.2ch.net/test/read.cgi/php/1358342748/ とんこつ系のインスタント麺で一番旨いのってどれだろう？
あのカップに入ってるちょっと高めのやつって実は値段ほど美味しくない # [Perl 日本語処理の基礎の基礎]
# このレスは、Windows の ActivePerl で日本語処理を行う場合のテンプレートです。
# このレスの内容をそのまま、UTF8 形式のソースファイルに保存して下さい。
# 入出力ともシフト JIS 形式のファイルまたは DOS 窓を想定しています。
# まず、以下の行を先頭に入れて下さい。
use utf8;
use open IO => ":encoding(cp932)";
binmode STDIN => ":encoding(cp932)";
binmode STDOUT => ":encoding(cp932)";
binmode STDERR => ":encoding(cp932)"; # ※1
use Encode;
# 次に、あなたが実行したい処理の内容を入れて下さい。
$file = 'C:/なんたら/かんたら.txt';
open my $fh, '<', encode("cp932", $file) or die $! ; # ※2
print <$fh>;
# 以上の内容は、日本語処理が解らない人でも、とりあえず日本語処理ができてしまう
# おまじないです。条件が異なる場合の対処方法は、ご自分で勉強して下さい。
# 【注】※1. の行を入れると、DOS 窓への日本語出力は簡便になりますが、
# ソースファイル名に非 ANSI 文字が含まれる場合に die 文の出力が失敗します。
# ※2. OS に渡す文字列（ファイル名，dos コマンドのオプションなど）は、
# この例のように cp932 でエンコードする必要があります。 カップヌードル鶏しお オニオンヌードル ビッグってうまいんだけど
食べた後、ずっと匂うよね とあるデータをケースによって変換したいんだけど、
例えば、$xにa,b,c,d・・・の文字が入ってるとして
a→林檎
b→バナナ
c→チーズ
d→デザート ・・・・ってな具合に。
一個一個置換演算するの面倒なんで、まとめて書く方法
ありますかね？ >>12
%a=(
"a" => "林檎",
"b" => "バナナ",
"c" => "チーズ",
"d" => "デザート"
);
$x =~ s/([a-d])/$a{$1}/g; サンクス
$x=$a{$key}; で処理できました。 XSS対策ですが、「”＆＜＞；」の5つは判るのですが
「｜(パイプ)」は何故禁則しないといけないんでしたっけ？
これをエスケープしたスクリプトをShift_JISで組むたびに
ポ掛芸など良く使う文字が化けてしまって困っています >>15
パイプをエスケープしなきゃいけないといった人に
資料持っていって、お前バカじゃね？って言ってやれｗ どこで問題が起きるかきちんと分けてやれってことだよなｗ
＞＜はopenでもHTMLでも問題があるけど、｜はHTMLには関係ないｗ 何でPerl厨ってあちこちの板でスレ乱立させてつまみ食いのように書き込むんだろうな。
キチガイしかいないのか？ >>18
逆にきくけどキチガイ以外がperlを選ぶ理由は？ >>15-17みればまともな奴がいないことは分かる 
