Perlコーディング初心者質問スレ Part 67

Perlのコーディングで困ってる人のスレです。

【投稿する際の注意】
質問するときは内容をよく吟味してから投稿してください。
「コマンドの意味がわかんない」とかはマニュアル見ましょう。
回答者さんは何でも屋じゃありません。

1： 自分はこういう事がしたい。
2： それでこんな風にやってみたが･･･
3： こんなエラーが出て上手く行かなかった。

最低でも1と3が無いと誰も答えられないよ。
良い回答は良い質問から。一緒に勉強しましょう。

お勧めサイトは >>2 以降

前スレ　http://kohada.2ch.net/test/read.cgi/php/1358342748/

[本]
初めてのPerl 第6版 (リャマ): http://www.oreilly.co.jp/books/9784873115672/
プログラミングPerl 第3版 (ラクダ) : http://www.oreilly.co.jp/books/4873110963/ http://www.oreilly.co.jp/books/4873110971/
Effective Perl: http://ascii.asciimw.jp/books/books/detail/4-7561-3057-7.shtml
Perlクックブック 第2版: http://www.oreilly.co.jp/books/4873112028/ http://www.oreilly.co.jp/books/4873112036/
Perl ベストプラクティス: http://www.oreilly.co.jp/books/4873113008/
Perl Hacks: http://www.oreilly.co.jp/books/9784873113142/

[オンラインマニュアル]
最新のドキュメント: http://perldoc.perl.org/
perldoc きまぐれ訳: http://fleur.hio.jp/perldoc/
perldoc.jp: http://perldoc.jp/

[モジュール]
CPAN: http://search.cpan.org/
今どきのCPAN環境構築術(cpanm, perlbrew): http://gihyo.jp/dev/serial/01/perl-hackers-hub/000701

[テクニック]
Perl Hackers Hub: http://gihyo.jp/dev/serial/01/perl-hackers-hub
モダンPerlの世界へようこそ: http://gihyo.jp/dev/serial/01/modern-perl/0001
Perlメモ: http://www.din.or.jp/~ohzaki/perl.htm
Perlのページ: http://homepage1.nifty.com/nomenclator/perl/

[Perl Unicodeメモ]
Perl における Unicode のチュートリアル: http://perldoc.jp/docs/perl/5.16.1/perlunitut.pod
Perl Unicode の手引き: http://perldoc.jp/docs/perl/5.8.1/perluniintro.pod
http://www.rwds.net/kuroita/program/Perl_unicode.html
http://www.namazu.org/~tsuchiya/perl/perl-5.8.html
http://www.lr.pi.titech.ac.jp/~abekawa/perl/perl_unicode.html

カップ麺スレ増殖中・・・

とんこつ系のインスタント麺で一番旨いのってどれだろう？
あのカップに入ってるちょっと高めのやつって実は値段ほど美味しくない

#　[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 でエンコードする必要があります。

巨専か
いちおつ

>>4
うまかっちゃん

そもそもとんこつ系って何がある？

age

カップヌードル鶏しお オニオンヌードル ビッグってうまいんだけど
食べた後、ずっと匂うよね

そそそそそそそそそ！

とあるデータをケースによって変換したいんだけど、
例えば、$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みればまともな奴がいないことは分かる

ということにしたい工作

>>15
パイプの替わりにシングルクォートをエスケープしとけ
あと、コマンドインジェクション対策ならパイプのエスケープは有効

XSS対策って書いてるの、見えないのかな？

自己顕示欲を満たしたいだけだから何が書いてあるかは問題ではない。

「体系的に学ぶ安全なWebアプリケーションの作り方」が達人出版会から発売されました。
http://blog.tokumaru.org/2013/11/drmpdf.html

>>19 実用性につきる

>>21
へぇ、糞スレ乱立させて前スレも大量に残ってるのに乱立スレに書き込むのがまともなのか
Perl厨のまともってそういうことだったのか

そりゃ>>15みたいな奴ばっかだろうよｗ

>>27
全くそのとおりだ
ちゃんと飯の話題で有意義に盛り上がっている↓のスレ以外は不要
ttp://kohada.2ch.net/test/read.cgi/php/1358196208/

>>15はまともだよ
まともなゴミｗ

>>15はゴミというか精神障害の一種だろう。

消えろクズが

この板に常駐しているのって、&#31362;主みたいなもんだよね。

&#31362;ってなに？

ろう

そのままググるとかできんの？

そんなくろうは竹刀