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

**nobodyさん** · 2012/07/31(火) 02:13:45.37

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

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

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

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

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

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

**nobodyさん** · 2012/11/18(日) 01:46:56.71

洗剤で手が荒れるから引退したんじゃなかったのか？

**nobodyさん** · 2012/11/18(日) 02:16:48.89

セブンイレブンは今カツ丼に力入れてるのか？

卵とじのロースカツ丼とソースヒレカツ丼の両方が売ってたんだが。

**nobodyさん** · 2012/11/18(日) 02:39:25.16

人が作った物を食べたからといって幸せになるわけじゃない
無駄な夢を見ないようにするためおれは温かい食べ物を食べない
死ぬときはひとり生きるのもひとりだ

**nobodyさん** · 2012/11/18(日) 03:36:57.15

ブリの叩き丼とかないのかな
食べたい

**nobodyさん** · 2012/11/18(日) 16:38:47.87

あるっぽいけどおれたち海なし県だしな

**nobodyさん** · 2012/11/18(日) 18:36:05.27

タタキって何で旨いんだろう。

あの焼き魚の香ばしさと刺身の新鮮さのハーモニーがたまらん。

**nobodyさん** · 2012/11/18(日) 23:12:59.86

おいしいと思って食べれば何でもおいしい。単なる気のせい。

**nobodyさん** · 2012/11/19(月) 00:23:16.78

どなたかお願いします・・。

環境：Active Perl (v5.16.1)
やりたいこと：文字列($result)から特定文字列($search_word)を削除(置換)

$result =~ s/$search_word//g; で正しく動作せず・・。
$result:Yahoo APIからの戻り文字列(UTF-8)
$search_word:ファイルから読み込んだ文字列(UTF-8)

use utf8;
use open ":utf8";
use open ":std";
をプログラムに追加しても、だめ。

**nobodyさん** · 2012/11/19(月) 00:34:17.52

$search_wordにメタ文字入ってたら×

**nobodyさん** · 2012/11/19(月) 00:38:09.46

$result =~ s/\Q$search_word\E//g;

**nobodyさん** · 2012/11/19(月) 00:39:33.48

解決したので食べ物の話題に戻ろう
「Twitterで聞いたから」は偽者
叩きは無視
カツオのたたきは美味

**nobodyさん** · 2012/11/19(月) 00:50:07.43

>>440 >>441
解決しました！！！
本当にありがとうございました・・m(_ _)m

丸２日間悩んでいたことが、３０分で解決。。
やっぱ２ちゃんは凄いや

**nobodyさん** · 2012/11/19(月) 00:55:05.33

>>443
いいから二度と来るなよ

**nobodyさん** · 2012/11/19(月) 00:56:54.04

>>443
後一言だけアドバイス
>>444のようにPerlスレはどこも荒らしだらけなので
2chで聞くのは控えるべき
今回のように即答が来るのは稀です…

**nobodyさん** · 2012/11/19(月) 01:17:59.25

さんまやあじは骨ごと食べるとおいしい。

**nobodyさん** · 2012/11/19(月) 01:27:23.14

サムゲタンを骨ごと食べるとお店の人が持ってくるお皿に何も入れるものが
なくなって恥ずかしいのはおれだけか？本当はあのお皿に骨を入れるべきな
のか？

**nobodyさん** · 2012/11/19(月) 02:00:01.00

>>442は根拠なくレッテル貼ってるだけだし、荒らしだろう。

**nobodyさん** · 2012/11/19(月) 02:12:18.73

>442が荒らし？

荒らしつーか
>439-443は全部自演だし

**nobodyさん** · 2012/11/20(火) 00:42:00.84

KALDIのコーヒーに手を伸ばせなかった小心者のおれがミルクと砂糖を断れる
くらい積極的になった。あと少しだ、がんばれおれ。

**nobodyさん** · 2012/11/21(水) 03:03:59.32

>>450
ここはてめーの日記帳なんだよ
わかってんのか

**nobodyさん** · 2012/11/22(木) 00:42:16.92

KALDIの横を通り、すすめられたコーヒーを断ってみた。
かなり自信がついてきた。これならいけるかもしれない。

**nobodyさん** · 2012/11/22(木) 00:45:19.80

ああ、Perlコーディング小心者スレね...

**nobodyさん** · 2012/11/29(木) 00:38:57.82

open(my $in, "<", "file.txt")
or die "can't open file: $!";
my (@line) = <$in>;
close($in);
----------------------------------------------------
「ファイルを開いて読みこむ」場面ってよくあると思うんですけど
そういう「開いて読みこんで閉じる」関数ってあるのですか？
4 行書くより一行で書けるならラクなんですが

**nobodyさん** · 2012/11/29(木) 07:19:45.78

>>454
http://perldoc.jp/docs/perl/5.14.1/perlfaq5.pod#How32can32I32read32in32an32entire32file32all32at32once63

**nobodyさん** · 2012/11/29(木) 23:17:21.11

>>455
ありがとうございます
faqなのに私の調査不足でした。すいません

**nobodyさん** · 2012/11/30(金) 10:41:33.85

謝らなくていいから二度と来るなよ

**nobodyさん** · 2012/12/01(土) 04:38:48.41

それは断るｗ

**nobodyさん** · 2012/12/01(土) 15:08:51.78

改装後のKALDIだが、以前とまったく変わったように見えない。
あの二週間は一体なんだったのか？それを質問するにはもう少し勇気が必要。

**nobodyさん** · 2012/12/12(水) 22:20:32.98

はいはいうんちちんこ

**nobodyさん** · 2012/12/19(水) 11:08:47.78

Perl CGI を使ったショッピングカートで注文主の方の名前が時々文字化けしてしまうんだけど
文字化けしない良い方法はないだろうか。

**nobodyさん** · 2012/12/19(水) 18:47:18.51

>>461
自分で調べろゴミが
それかそのサイトをとっとと閉鎖すれば？
そうすれば文字化けしなくなるし
2chできかなきゃ解決できないゴミが路頭に迷って餓死するから一石二鳥

**nobodyさん** · 2012/12/19(水) 20:16:46.87

>>461
文字化けの原因とひとことでいってもそれこそ千差万別だからねえ。
そのCGIがどんな作りになっているのかすらもまったくわからない状態で、
アドバイスするのは相当な超人でも無理だろうな。

**nobodyさん** · 2012/12/19(水) 21:00:21.69

それだけの情報で答えがもらえると思ってる知能障害の>>461がいるのはこのスレですか？

**nobodyさん** · 2012/12/19(水) 21:49:42.03

文字化けの原因は入力時と出力時の
(1) 文字集合の不一致
(2) 符号化方式の不一致
(3) フォント(書体)の不一致
がある。ときどき文字化けする、ということから(1)とか(3)があやしい。
解決策として、
(1) ローマ字を使う
(2) カタカナを使う
(3) クライアント側で送信前にエンコードする
がある。この中で一番無難な方法は(1)。

**nobodyさん** · 2012/12/19(水) 23:05:10.10

てか人に質問なんかするな
全部自分で解決しろ
ここは質問スレじゃねえんだよ

**nobodyさん** · 2012/12/19(水) 23:34:15.71

>>461
お前はヴァカだから無理

諦めろ

**nobodyさん** · 2012/12/19(水) 23:36:42.39

>>461をラクダ本で殴り続けると死ぬ

**nobodyさん** · 2012/12/19(水) 23:37:23.26

ちなみに>>461の質問はこのスレの住人なら全員解決できます
でも教えない
それがお前のためだからだ

**nobodyさん** · 2012/12/20(木) 00:13:06.87

え？いつから、俺>>461とタメになったの？

**nobodyさん** · 2012/12/20(木) 01:00:22.26

すげー下品なゲーム考えた
ロッ〇マンをパロったやつで、敵が全部下ネタ

＜ボス一覧＞
チンコマン
キンタマン
アナルマン
チンゲマン
マンゲマン
ラビアマン
バギナマン
ファックマン

それで例えば「ファックマン」を倒して入手できる特殊武器「フィストファック」がバギナマンの弱点
フィストファックを使うとロケットパンチみたいに腕の形をしたミサイルが飛んでいく

チンコマンはバギナマンを倒して入手できる「ミミズセンビキ」が弱点
ミミズセンビキはオナホ形のミサイルが飛んでいく
小さい雑魚敵は当たると吸い込まれていく、但しそれでオナホ型ミサイルは消滅しないので貫通弾的な位置付け

マンゲマンの弱点はチンコマンを倒して入手できる「ザーメンレーザー」
このレーザーは真横に発射すると下方へ放物線を描いて落ちていく特殊な軌道を描く
通常の敵には通常のダメージだが、マンゲマンに当てると絡み付いてダメージ＋数秒動きを止める

**nobodyさん** · 2012/12/20(木) 02:02:51.73

>>461
文字化けする例をあげてもらってもいいですか？できれば複数あったほうが
問題を特定しやすいです。

**nobodyさん** · 2012/12/20(木) 03:07:14.57

>>461
文字化けはどうでもいいからさっさと消えてもらっていいですか？できれば回線切って引き込もってくれたほうが
世の中に迷惑がかかりにくいです。

**nobodyさん** · 2012/12/20(木) 15:45:29.76

>>461
そのCGIが古くてjcode.plを使ってたりする場合は、
Encode.pmかせめてJcode.pmを使うようリライトしとく必要があるかな。
jcode.plは確かutf-8は扱えなかった筈だし。
あとEUC-JPとShift_JISの自動判別は難しいからそのへんで化ける可能性は大かなあ。

**nobodyさん** · 2012/12/20(木) 20:35:38.52

このキチガイは何でいきなりCGIが古いとか勝手に条件つけて回答してんだろうな
妄想してまで自己顕示欲満たしたいとかマジキチぱねぇｗ

**nobodyさん** · 2012/12/20(木) 20:55:46.17

お前ら今日の晩飯なによ？

**nobodyさん** · 2012/12/20(木) 21:02:04.41

マジキチな人がなんか自己紹介しに来てるけどスルー

>>476
マックスバリュで白飯とフライドチキン買ってきた

**nobodyさん** · 2012/12/20(木) 22:02:25.55

天ぷらうどん

**nobodyさん** · 2012/12/21(金) 00:16:32.50

カツカレー

**nobodyさん** · 2012/12/21(金) 01:51:07.77

・鯵⇔鯵が入れ替わる
・槇の字が表示されない
・①が表示されない
・凜が表示されない
・辻の字の点が１つなのか２つなのか
・口へんに七が表示されない
・～の形が変わる

**nobodyさん** · 2012/12/21(金) 01:55:13.45

鮭の鎌焼きがしょっぱかった

**461** · 2012/12/21(金) 10:44:20.55

>>472
今回は「崎」の字が化けたようです。

>>474
モジュールですね。今のところギリギリかな、ｵｲﾗの力では。
勉強しながらなんとかやってみまつ。

御二方、ありがとう。＾＾ﾉｼ

**nobodyさん** · 2012/12/21(金) 11:17:33.16

>>482
見ず知らずの他人に聞かなきゃ自分の仕事もままならないとかｗ見事なクズの見本だなｗｗｗ
お前みたいなクズには無理だったんだよ
現実見てさっさと諦めろ
自分でできもしない仕事に手を出すとか世の中にとって迷惑でしかない
モジュールすらままならないゴミがショッピングカートとかセキュリティホールありまくりなんだろうな
お前みたいに身の丈にあった仕事を選べないゴミが一番迷惑

**nobodyさん** · 2012/12/21(金) 11:23:49.15

荒らしはいつも「仕事なら他人に一切聞くな」って言うよね
こいつ会社で部下持ってたらそいつが勉強会に行くことを頑なに禁止するんだろうなぁ

**nobodyさん** · 2012/12/21(金) 11:36:46.48

>>461って他人の個人情報垂れ流して平気なんだな。

マジで神経疑うわ。

**nobodyさん** · 2012/12/21(金) 11:39:13.63

荒らしっていつも仕事について２ｃｈできくことを肯定するよね
こいつ２ｃｈできいた情報が原因でバグを組み込んだら何て言い訳するんだろうな

**nobodyさん** · 2012/12/21(金) 11:46:34.96

今度は個人情報を流出させて喜んでる基地害か

>>461みたいな基地害はどこから湧いてくるのか本当に疑問

**nobodyさん** · 2012/12/21(金) 11:47:26.39

>>483
ウダツの上がらない生活続けて何年目？
決しておまえの事業は大きくはならないよ。

**nobodyさん** · 2012/12/21(金) 11:51:54.71

>>486
オウム返しもろくにできないカス

**nobodyさん** · 2012/12/21(金) 11:55:24.70

>>488
ウダツのあがらない生活続けて4年目だよ
お前の言う通り事業がなかなか大きくならないし、年収もなかなか増えない
5年目までに年収1億目指してたけど昨年度で3200万だったからたぶん無理
ネットしたりゲームしたりして遊びながら仕事してるから当たり前といえば当たり前だが

**nobodyさん** · 2012/12/21(金) 11:56:16.94

セキュリティガタガタのシステムで商売してるゴミがいるのはこのスレですか？ｗ

**nobodyさん** · 2012/12/21(金) 11:58:17.05

さぁさぁ荒らしの>461の作戦通り荒れて参りました。
いいぞみんなもっと荒らしに協力しろ。

**nobodyさん** · 2012/12/21(金) 12:01:07.24

個人情報流出しても平気なヤツって神経疑うわ、コイツプログラミングなんかやめたほうがはるかに社会の利益

**nobodyさん** · 2012/12/21(金) 12:03:27.88

>>461よりも>>492 etcの方がよっぽど荒らしなわけだが
「正義を重んじる一市民」だというのなら反論してみろｋｓ

**nobodyさん** · 2012/12/21(金) 12:08:03.56

>>493
文字化けを悪用して個人情報を流出させる方法ｋｗｓｋ

**nobodyさん** · 2012/12/21(金) 12:12:13.54

セキュリティがどうの個人情報がどうのって言ってる人がいるけど,
>>461みたいな阿呆は平気とかどうとか言うよりそこまで考えてないと思う.
一番始末が悪い.

**nobodyさん** · 2012/12/21(金) 12:12:38.40

>>490
それだけの収入がある割には精神衛生悪そうじゃないか。
もう諦めてコンビニのアルバイトからやり直したら？

**nobodyさん** · 2012/12/21(金) 12:13:41.86

言ってもいない事を読み取るマンこと>>496

**nobodyさん** · 2012/12/21(金) 12:15:14.53

>>496

やけに>>461に構うな。
どうしてそこまで目の敵にするんだ？
おれはそんなおまえにこそ興味あるな。
2chならバレないと思う？

**nobodyさん** · 2012/12/21(金) 12:18:36.08

>>461の釣糸に勢いよく食いついてるキチガイがいるなｗ
釣りって気付かない？ｗ

**nobodyさん** · 2012/12/21(金) 12:21:15.10

>>494
>>461に協力感謝します。
肯定でも反論でも正しくても間違っていてもそのみなさんの一言一言がスレの殺伐化に貢献しています。

**nobodyさん** · 2012/12/21(金) 12:25:11.59

人に聞くことを否定するのは人間の進化を否定してるよな
文明の発達は高度な意思疎通によるもの
すべて自分で体験しないとだめなら一生では時間が少なすぎる

それに書籍でもweb上でも結局は誰かが書いたものなんだから
広義では人に聞いているのと同じだし

ちなみに「人」には「人に聞くな、プログラミングなんかやめちまえ」と言う輩は含みません

**nobodyさん** · 2012/12/21(金) 12:26:13.54

>>497
たったそれだけの収入で精神状態がよくなるわけないだろ
本当は7000万くらいいく予定だったのに半分もいってないし
欲しい車も買えない別荘も買えない

コンビニのバイトはゲームしたりして遊びながらできないから嫌だ
それだったら今のほうが幾分かマシ

**nobodyさん** · 2012/12/21(金) 12:28:08.11

Webで人にきくのが書籍で調べるのと同じとか
>>502は論文とか書いたことないんだろうな・・・

**nobodyさん** · 2012/12/21(金) 12:31:22.99

>>503
遊びながらでも稼げる仕事とは仕事そのものはコンビニバイト以下と言えるな。
そんな下等な仕事で年収3500万も稼いだとは大したもんだよ。仕事ってオレオレ詐欺みたいな仕事？
最低だな。おまえが稼ぐ為にどんだけの幸せでマトモな方々がショッキングな思いをしてることか。死ねよクソカス

**nobodyさん** · 2012/12/21(金) 12:31:26.25

文脈から察すると、
文字化け対策に必要なスキル＜セキュリティ対策に必要なスキル
ってことじゃないの？
質問者のスキルをxとすると、
x≦文字化け＜セキュリティ
だからセキュリティ対策は無理だってことじゃないの？

**nobodyさん** · 2012/12/21(金) 12:34:20.74

ちなみにコンビニバイトって大変だよ？
遊びながらでもできるような仕事じゃなきゃヤダなんておこちゃまじゃできない仕事だ。しかもたくさんの人の役に立ってる立派な仕事。
ﾎﾞｸは今の仕事でやってけなくなったらもう他にできる仕事ないから他人の迷惑にならないように人知れず切腹でもしなさい。>>503

**nobodyさん** · 2012/12/21(金) 12:36:19.59

>>505
詐欺じゃないよ
IT関係
税金もちゃんと払ってる

マトモな人は俺より稼いでるだろ、本当にマトモならな
俺もネットとかゲームしてなかったらもうちょい稼げる気がしないでもない

**nobodyさん** · 2012/12/21(金) 12:38:45.35

>>503
しっかし遊んでてもできるような仕事で7000万はいくと思ってたとは頭の悪い人の話だな。
九九はできるか？街の本屋さんにいって算数ドリル買って　かけ算　をまず身に付けなさいそうすれば今度は割り算ができるようになるから。
車買う前に免許って知ってる？別荘が欲しいってもタダじゃ買えないよ？

**nobodyさん** · 2012/12/21(金) 12:39:57.17

>>508
今年は年収でどれくらいになるんだ？
自営か？勤めか？

**nobodyさん** · 2012/12/21(金) 12:42:54.41

収入の話はいい
今日食った昼飯の話やれ
ちなみに俺はジャムパンとプリン

**nobodyさん** · 2012/12/21(金) 12:44:57.47

切腹でもしなさいは自殺教唆。
他人に説教できるほど立派な人は自殺教唆を行う。

**nobodyさん** · 2012/12/21(金) 13:00:26.81

>>512
なにいってんだ？おまえ

>>511
子供のおやつみたいな昼飯だな。

**nobodyさん** · 2012/12/21(金) 13:15:25.98

今から昼飯、
とんこつラーメンでも食うか。

**nobodyさん** · 2012/12/21(金) 13:19:45.06

>>514
昼食は簡単でいい。
ラーメンや鍋なら夕食にしろ。今の季節なら良いから。
昼食でラーメンとかわかってない若年のやることだよ。

**nobodyさん** · 2012/12/21(金) 14:14:34.26

ラーメンは簡単だろ

煮込みハンバーグとかトンカツ定食だったらややこしいけど

**nobodyさん** · 2012/12/21(金) 17:52:48.68

お前らポテチの袋はどうやって開ける？
左右から引っ張ってくぱぁって開ける？
ギザギザのところから縦に割く？

**nobodyさん** · 2012/12/22(土) 00:28:16.77

>>472
>今回は「崎」の字が化けたようです。
ttp://ja.wikipedia.org/wiki/Microsoft%E3%82%B3%E3%83%BC%E3%83%89%E3%83%9A%E3%83%BC%E3%82%B8932#JIS_X_0213:2004_.E3.81.AB.E7.99.BB.E9.8C.B2.E3.81.95.
E3.82.8C.E3.81.A6.E3.81.84.E3.82.8B_IBM_.E6.8B.A1.E5.BC.B5.E6.96.87.
E5.AD.97.EF.BC.88.E5.85.A8.E9.83.A8.EF.BC.89
下記の名前の文字中、「髙」は「高」の、「﨑」は「崎」の俗字であり、
康熙字典に根拠はない。

CP932と指定すべきところにShiftJIS(sjis,s-jisなど)としているのではないか？

**nobodyさん** · 2012/12/22(土) 01:00:30.57

7000万ってことは日本円にすると550万円くらいってこと？

**461** · 2012/12/22(土) 01:20:31.45

はいマジレスして喜んでるヴァカ>>518が釣れましたｗ
つーかもう十分釣れたからもういらないんだけどｗｗ

**nobodyさん** · 2012/12/22(土) 03:14:03.90

>>520
>>518は基地害なんだから相手にするなって。
相手してるとお前まで荒らしになるぞ。

**nobodyさん** · 2012/12/22(土) 03:58:25.27

>>521
それが目的なんだけど
余計なお世話だよ

**nobodyさん** · 2012/12/22(土) 07:36:10.81

まあここまで自演なんだけどなpgr

**nobodyさん** · 2012/12/22(土) 11:06:19.58

もし $i がAでもBでもCでもDでもないならば～する、っていう構文はどうしたらいいかな？

if ( $i ne ABCD ) {
～
}

といった形にしたいんだけど、何か良い方法はないでしょうか？

**nobodyさん** · 2012/12/22(土) 11:08:22.27

>>518
レスありがとう。まずは御礼だけでも。
ちょっと今のところは難しいようです。(^_^;)

**nobodyさん** · 2012/12/22(土) 11:19:54.42

unless($i =~ /^(A|B|C|D)$/){
～
}

**nobodyさん** · 2012/12/22(土) 11:29:16.01

>>526
ありがとう！
やっぱりパターンマッチしかないのだろうか？こいう場合は。

**nobodyさん** · 2012/12/22(土) 11:35:13.83

unless ($i ~~ ['A'..'D']) { }

**nobodyさん** · 2012/12/22(土) 11:47:58.17

ありがとう！>>526の方式でやってみますた。
助かったよ～！＾＾ﾉｼ

**nobodyさん** · 2012/12/22(土) 11:50:53.37

>>529
また情報乞食か
自分の子が乞食になって親もさぞ喜んでるだろうよ

**nobodyさん** · 2012/12/22(土) 13:05:55.39

>>524
if ( none { $i ne $_ } qw/A B C D/) {
~
}

**nobodyさん** · 2012/12/22(土) 14:53:41.91

Perlにあらたに加わったスマートマッチがスマートすぎてついていけない。
クリティカルな部分を組もうとしたときに勘違いして書きそうなのが何より
怖い。さらにはあんまり凝って書くとメンテするときに苦労する。
抽象化や高度化はそこそこにしておかないといけないという教訓だ。