Perl初心者スレ(マジレス回答) (523レス)
Perl初心者スレ(マジレス回答) http://mevius.5ch.net/test/read.cgi/tech/1349538519/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
233: デフォルトの名無しさん [] 2014/02/19(水) 20:04:58.23 上みたいなプログラミングを組んで、A=とB=にそれぞれ任意の数字を入れるとA*Bの答えが表示されるようにしたいんですが、 いざ実行してみても上のプログラミングがそのまま表示されるだけで正しい結果が得られないのですが、 どうしたらよいでしょうか。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/233
234: デフォルトの名無しさん [] 2014/02/19(水) 20:09:03.95 というか、どこかおかしいところがあるでしょうか? http://mevius.5ch.net/test/read.cgi/tech/1349538519/234
235: デフォルトの名無しさん [sage] 2014/02/19(水) 20:33:02.58 >>232-234 おかしいのはお前の頭だ 基本的なこともできてないくせに他人に質問とか頭腐ってんじゃねーの http://mevius.5ch.net/test/read.cgi/tech/1349538519/235
236: デフォルトの名無しさん [sage] 2014/02/19(水) 20:36:13.45 >>234 >>232,>>233が板違いだということに気付かないのがおかしい。 平気で板違いの書き込みをするキチガイは迷惑。 お前みたいなクズはリアルでも迷惑がられてるんだから自覚しろ。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/236
237: デフォルトの名無しさん [sage] 2014/02/19(水) 20:41:12.79 >>232=基礎をやらずにいきなりプログラミングから入る典型的なゴミ 目的達成までの手順すら把握できてないからプログラミング以前の問題 何やっても駄目な奴のパターン 人生乙 http://mevius.5ch.net/test/read.cgi/tech/1349538519/237
238: デフォルトの名無しさん [] 2014/02/19(水) 20:41:52.31 しね http://mevius.5ch.net/test/read.cgi/tech/1349538519/238
239: デフォルトの名無しさん [sage] 2014/02/19(水) 20:47:40.29 >>237 人生乙は言い過ぎ。 高卒以上なら人生乙だけど、 >>232-234みたいな小学生は 中高で挽回できる可能性がある。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/239
240: デフォルトの名無しさん [] 2014/02/19(水) 20:49:37.80 一人芝居乙ですwwww http://mevius.5ch.net/test/read.cgi/tech/1349538519/240
241: デフォルトの名無しさん [sage] 2014/02/19(水) 20:50:45.28 >上みたいなプログラミングを組んで、A=とB=にそれぞれ任意の数字を入れるとA*Bの答えが表示されるようにしたいんですが、 >いざ実行してみても上のプログラミングがそのまま表示されるだけで正しい結果が得られないのですが、 日記はブログに書け >どうしたらよいでしょうか。 今すぐプログラミングやめろ そして二度とくるな http://mevius.5ch.net/test/read.cgi/tech/1349538519/241
242: デフォルトの名無しさん [sage] 2014/02/19(水) 20:53:44.83 Perl系スレは質問者が叩かれると張り切って答える奴がいるから 質問したら自演で自分を叩くのが常套手段 http://mevius.5ch.net/test/read.cgi/tech/1349538519/242
243: デフォルトの名無しさん [sage] 2014/02/19(水) 20:56:43.89 >>234 スレ違いのネタで荒らす以外やることないわけ? http://mevius.5ch.net/test/read.cgi/tech/1349538519/243
244: デフォルトの名無しさん [sage] 2014/02/19(水) 20:59:52.26 スレ違いどころか板違い 頭が悪いにも程がある 発達障害かもな http://mevius.5ch.net/test/read.cgi/tech/1349538519/244
245: デフォルトの名無しさん [sage] 2014/02/19(水) 21:03:24.03 >>232 馬鹿はPerlコミュニティの質を下げるだけだからこっちに行ってくれ。 http://kohada.2ch.net/test/read.cgi/php/1390166591/ http://mevius.5ch.net/test/read.cgi/tech/1349538519/245
246: デフォルトの名無しさん [sage] 2014/02/19(水) 21:11:38.56 >>232 PHPなら一瞬で片付く案件 <?php $x = $_GET['name1'] * $_GET['name2']; echo( $_GET['name1'] . " * " . $_GET['name2'] . " = " . $x ); ?> http://mevius.5ch.net/test/read.cgi/tech/1349538519/246
247: デフォルトの名無しさん [sage] 2014/02/19(水) 21:16:25.09 >>234 入門書1冊読めば大抵書いてあるはずだが・・・ 本1冊買えない乞食か? そんなに金がないならプログラムなんかやめてバイトでもしたほうがいい 日雇いでも書籍1〜3冊買える金もらえるぞ http://mevius.5ch.net/test/read.cgi/tech/1349538519/247
248: デフォルトの名無しさん [] 2014/02/19(水) 21:27:19.38 初心者スレってかいてあるだろーが字よめねぇのかよカス http://mevius.5ch.net/test/read.cgi/tech/1349538519/248
249: デフォルトの名無しさん [sage] 2014/02/19(水) 21:34:53.78 書籍すら読めないのは初心者以前に脳に異常がある http://mevius.5ch.net/test/read.cgi/tech/1349538519/249
250: デフォルトの名無しさん [sage] 2014/02/19(水) 21:42:16.32 >>248 だよね。 初心者だったらスレ違いだろうが板違いだろうが 気違いだろうが許されるよね。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/250
251: デフォルトの名無しさん [sage] 2014/02/19(水) 22:23:35.20 >>250 板違いは許されんよ。 基地外はスルーだよ。 頭悪いのはテキトーに対応するべきだよ。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/251
252: デフォルトの名無しさん [] 2014/02/20(木) 01:17:13.12 初心者は自力で解決しようとしない奴のことではないぞ http://mevius.5ch.net/test/read.cgi/tech/1349538519/252
253: デフォルトの名無しさん [sage] 2014/02/20(木) 19:53:03.78 >>232 A*B = $A * $B の部分を A*B = @{[ $A * $B ]} http://mevius.5ch.net/test/read.cgi/tech/1349538519/253
254: デフォルトの名無しさん [sage] 2014/02/20(木) 20:41:02.18 >>253 板違いのゴミ(>>253)にエサを与えないでください。 エサを与えるとゴミ知能の>>253が味をしめて今後も荒らしに来るようになります。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/254
255: デフォルトの名無しさん [sage] 2014/02/21(金) 00:11:06.41 と荒らしが申しております http://mevius.5ch.net/test/read.cgi/tech/1349538519/255
256: デフォルトの名無しさん [sage] 2014/02/21(金) 01:00:44.16 >>255を見れば分かるが 「板違いは荒らし」という人間 = 荒らし この思考回路がPerl厨 http://mevius.5ch.net/test/read.cgi/tech/1349538519/256
257: デフォルトの名無しさん [sage] 2014/02/21(金) 02:50:14.54 >>256 残念ながら、思考回路も間違ってるしPerl厨でもないなあ 板違いの指摘そのものは問題ではないよ、実際のところ >>232 は板違いだしな ただ板違いへの対応ってのは ・板違いと指摘する ・徹底してスルーする であるし >>254 が板違いのゴミと呼ぶ >>253 は 「板違い」ではなく「板違いに誤った対応をした人物」でしかない。 しかも内容は相手を煽るような罵倒語ばかり。 誤った煽りは、結果的にはその人物の発言を増やすことになる。 だから >>254 も荒らしってことなんだよ。 ああ、荒らしにレスするのも荒らしだからな 俺が荒らしと言われても、勿論構わないよ? 荒らしにレスしたことには間違いないしな。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/257
258: デフォルトの名無しさん [sage] 2014/02/21(金) 02:51:46.89 >「板違いは荒らし」という人間 = 荒らし Perl厨はいちいちこんなこと考えてないと思うぞ。 単に 気に入らない奴=荒らし ってことだと思われる。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/258
259: デフォルトの名無しさん [sage] 2014/02/22(土) 22:30:28.45 質問させてください。 現在、NEなのですが、社内SEを目指しています。 その時に、サーバ作業を簡単に処理させる言語が必要にりそうなのですが、 Perlは向いていますでしょうか? 掲示板とかを作るつもりはありません。作業の効率化が目的です。 隣の席のプログラマさんに聞くと、 Perlは古くてCGIにはもう未来がないよー、ってお勧めされないのですが… http://mevius.5ch.net/test/read.cgi/tech/1349538519/259
260: デフォルトの名無しさん [sage] 2014/02/22(土) 23:19:05.46 >>259 IT系で上を目指そうって人間に何でPerlなんて選択肢があるわけ? そこらへん考えたほうがいいよ。 SEならITに関しては常に最新の動向を知るためにアンテナ張ってなきゃならないし、 アンテナ張ってればPerlがいかに駄目かというこてが分かる。 SE目指すならその辺りを自分で調べられるようになってたほうがいい。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/260
261: デフォルトの名無しさん [sage] 2014/02/22(土) 23:25:59.25 >>259 PHPのほうがいい 作業を簡単に処理させるスクリプトとかって最初はそのつもりがなくても便利ならそのまま他のものを作るときに組み込んだりする エンジニア以外でも有用な場合はWebインターフェースにして提供することなるけどその場合にPHPで書いてあるとインターフェース作るだけですぐに提供できる http://mevius.5ch.net/test/read.cgi/tech/1349538519/261
262: デフォルトの名無しさん [sage] 2014/02/22(土) 23:28:04.79 >>259 マジレスすると今現在はRuby 但し3ヵ月後、半年後は分からん 自分でその情報を追えないならSEはやめとけ 今現在既に追えてないみたいだけど http://mevius.5ch.net/test/read.cgi/tech/1349538519/262
263: デフォルトの名無しさん [sage] 2014/02/22(土) 23:50:35.64 >>259 そもそもその文脈でCGIは全く関係ないよ。そこに気付けないなんて釣りだろ? http://mevius.5ch.net/test/read.cgi/tech/1349538519/263
264: デフォルトの名無しさん [sage] 2014/02/22(土) 23:56:23.80 >>260-263 ありがとうございます! javaか、PHPか、perlで悩んでました。 色々調べると、PHPが入り易そうなので、、 明日、本屋に行って、決めます。 ※CGIは、掲示板とか作るのであって、検索とかするのとは違うなあ、 と思いながら、プログラマさんの意見を聞いていました。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/264
265: デフォルトの名無しさん [sage] 2014/02/23(日) 00:03:57.16 >>264 やっぱ釣りだったか http://mevius.5ch.net/test/read.cgi/tech/1349538519/265
266: デフォルトの名無しさん [sage] 2014/02/23(日) 00:08:16.47 PHPが第一候補だったのですが、某サイトで、 PHPは、WEB系以外には、まったく意味がない、との様なコメントがあり、困りました。 javaは、いきなり入るには、まだ敷居が高いかなと悩みました。 perlは、単に簡単な、検索や置換には適しているようなコメントで一気に候補に挙がりました。 これらから悩んでいたんです。コメントありがとうございます。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/266
267: デフォルトの名無しさん [sage] 2014/02/23(日) 00:20:28.63 >>266 そのコメントとやらの投稿日時と信憑性も確認しろよ まさか去年の夏以前の投稿で、しかも第一線で活躍してい"た"奴の投稿じゃないだろうな 3ヵ月以内の投稿で、しかも第一線で活躍してい"る"人の投稿なら信用しろ そしてそういう人ならまずPerlを候補に挙げることはない まぁ第一線で活躍してるわけでもない俺のこんな匿名の投稿も信憑性がないだろうから 第一線で活躍してる人がPerlなんか使わないということは自分の目で確認してくれ http://mevius.5ch.net/test/read.cgi/tech/1349538519/267
268: デフォルトの名無しさん [sage] 2014/02/23(日) 00:24:33.24 >>267 投稿日時、第一線は確認していませんでした。 すみません、助言、ありがとうございます。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/268
269: デフォルトの名無しさん [sage] 2014/02/23(日) 00:27:42.14 >>266 PHPがWeb系以外に使えんのは本当 Perlでも良いけど、RubyやPythonも有効だよ まあ、まずは最初にシェルスクリプトだけどね http://mevius.5ch.net/test/read.cgi/tech/1349538519/269
270: デフォルトの名無しさん [sage] 2014/02/23(日) 00:38:05.80 と言うか、PerlスレにPHPのこと聞く時点で釣り http://mevius.5ch.net/test/read.cgi/tech/1349538519/270
271: デフォルトの名無しさん [sage] 2014/02/23(日) 00:39:36.75 >>269 >PerlとLispが結婚して隔世遺伝が黒魔術で生まれた言語。 >Javaは硬度8くらい、Pythonは6くらいになるのに対して、Rubyは3くらいになる。 との記事を見つけました。いつの記述かわからないのですが(汗) Rubyも明日、本屋で漁ってみます。ありがとうございます。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/271
272: デフォルトの名無しさん [sage] 2014/02/23(日) 00:40:48.81 >>270 すみません。退散します。 みなさん、マジレス、ありがとうございます。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/272
273: デフォルトの名無しさん [sage] 2014/03/05(水) 06:22:38.93 >>232-234 _EOM_なんて使っちゃだめだよ。見づらい。 print "Content-type: text/html\n\n"; print "<html>"; print "<body>"; print "A*B = $A * $B"; print "</body>"; print "</html>"; http://mevius.5ch.net/test/read.cgi/tech/1349538519/273
274: デフォルトの名無しさん [sage] 2014/03/25(火) 21:15:29.29 ID:dz69sIJc print "あいうえお"; ↑これを文字コードをeuc-jpで保存してコマンドプロントからこのファイルを実行して コマンドプロンプト上に文字化けなく あいうえお と出力させるにはどういうコードを追加すればいいの? http://mevius.5ch.net/test/read.cgi/tech/1349538519/274
275: デフォルトの名無しさん [sage] 2014/03/25(火) 21:25:34.52 ID:dz69sIJc >>274はちょっと疑問に思っただけで何かするのに必要なワケじゃないので無理して 答えようとしないで下さい。たぶんちょっとググった程度で分かるようなことではないです。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/275
276: デフォルトの名無しさん [sage] 2014/03/25(火) 21:54:24.41 ID:En8OrmpQ >>274-275 http://perldoc.jp/docs/modules/encoding/encoding.pod use encoding 'euc-jp', STDOUT => 'cp932'; 但し Perl 5.18.0 以降、encoding プラグマは非推奨で将来的に削除される予定。 http://perldoc.perl.org/encoding.html#WARNING http://mevius.5ch.net/test/read.cgi/tech/1349538519/276
277: 274 [sage] 2014/03/25(火) 22:08:05.94 ID:dz69sIJc >>276 うおお、すごい、あっさり出来てしまった・・。 今日一日↓こんなのでやろうとして泥沼にハマってました。 use encoding "euc-jp"; binmode STDOUT, ':encoding(cp932)'; スーパーハカーさんどうもありがとう〜 http://mevius.5ch.net/test/read.cgi/tech/1349538519/277
278: デフォルトの名無しさん [sage] 2014/05/07(水) 01:39:02.09 ID:NfbdqxRr print +(3,2,1,),"\n"; ↑これ、+記号を消すと改行が反映されなくなるんですが、この+記号って どういう意味ですか?ググるためのキーワードだけでもおねがいします。 ググると +{ } は出てきたんですが +( ) はなぜか見つかりませんでした。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/278
279: デフォルトの名無しさん [sage] 2014/05/07(水) 04:47:36.14 ID:nyTYPDB6 >>278 (print(3,2,1)), "\n"; http://mevius.5ch.net/test/read.cgi/tech/1349538519/279
280: デフォルトの名無しさん [sage] 2014/05/07(水) 06:28:00.20 ID:WoJ0c0N0 +() は scalar () とほぼ同等。 +{}は、ブロック中の戻り値(?)をスカラーとして評価しますって意味。 +()は、リストとして評価しませんよーって意味。 perldocのperlopの Terms and List Operators (Leftward) と Unary "+" を参照してください。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/280
281: 278 [sage] 2014/05/07(水) 09:44:31.49 ID:NfbdqxRr >>279-280 なるほど、+{ } と同じような使い方だったんですね、ありがとうございました。 perldocもこれから読んでみます、多謝。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/281
282: デフォルトの名無しさん [sage] 2014/05/17(土) 17:23:28.43 ID:syasv/b2 windowsの隠しファイルを判別する方法を教えてください http://mevius.5ch.net/test/read.cgi/tech/1349538519/282
283: デフォルトの名無しさん [sage] 2014/05/17(土) 18:53:12.61 ID:9KhUrEje >>282 http://search.cpan.org/dist/Win32-File/File.pm use Win32::File qw(GetAttributes HIDDEN); GetAttributes($ARGV[0], my $attr) or die $!; print +($attr & HIDDEN) ? 1 : 0; http://mevius.5ch.net/test/read.cgi/tech/1349538519/283
284: デフォルトの名無しさん [sage] 2014/05/17(土) 18:54:17.69 ID:syasv/b2 >>283 ありがとうございます http://mevius.5ch.net/test/read.cgi/tech/1349538519/284
285: デフォルトの名無しさん [sage] 2014/05/24(土) 13:13:06.88 ID:JzdRsmzF 掲示板のCGIを設置したんだけど、<a href="./bbs/mtbbs.cgi?">って感じにリンクするようにして、http://172では、ちゃんと作動したんだけど、 実際にFTPに転送すると、作動しないどころか画面が写らない 500エラーが出てくる 原因に関してはまだわかんなくて、調べてるんだけど、そもそも思ったのが<a href="./bbs/mtbbs.html">ならまだしも<a href="./bbs/mtbbs.cgi?">なんて、直にリンクすることなんてできるの? http://mevius.5ch.net/test/read.cgi/tech/1349538519/285
286: デフォルトの名無しさん [sage] 2014/05/24(土) 17:20:37.74 ID:Cq+cm/k7 >>285 WebProg板へドゾー http://mevius.5ch.net/test/read.cgi/tech/1349538519/286
287: デフォルトの名無しさん [sage] 2014/05/25(日) 10:23:53.30 ID:iOXakntE >>285 リンクはできる 動かない原因は別にある http://mevius.5ch.net/test/read.cgi/tech/1349538519/287
288: デフォルトの名無しさん [] 2014/06/04(水) 10:34:27.77 ID:8N6swAY/ 知恵袋で質問したら回答どころか閲覧すらなさすぎワロタ・・・ http://mevius.5ch.net/test/read.cgi/tech/1349538519/288
289: デフォルトの名無しさん [] 2014/06/04(水) 15:39:06.30 ID:ZiHf6GEW 早くマジレスしろ屑やろう http://mevius.5ch.net/test/read.cgi/tech/1349538519/289
290: デフォルトの名無しさん [] 2014/06/05(木) 04:14:43.22 ID:tjfA5i3O 質問してもどうせまともに答えてくれないんだろうな どこ行っても解決しないわ http://mevius.5ch.net/test/read.cgi/tech/1349538519/290
291: デフォルトの名無しさん [sage] 2014/06/05(木) 06:34:54.17 ID:Mvr5+GEe Web以外で最近なんか未解決質問あったっけここ http://mevius.5ch.net/test/read.cgi/tech/1349538519/291
292: デフォルトの名無しさん [sage] 2014/06/05(木) 19:01:58.49 ID:aZWI6Ot4 >>291 今日も元気に残件なす! http://mevius.5ch.net/test/read.cgi/tech/1349538519/292
293: デフォルトの名無しさん [sage] 2014/06/08(日) 05:04:05.20 ID:LT2twBt5 複数のRSSフィードを結合して一つのRSSを生成したい。 その際、「生成されたフィード記事のリンクURLすべてを任意のリンク先に指定する。」 このやり方を教えてください。 XML::FeedPP、XML::TreePPというモジュールを用い、下記のCGIプログラムを使用して自動更新する1つのフィードを生成するところまでは出来ました。 しかし、他の部分はチョロチョロと変えることができるのですが、記事リンクだけはどうしても変えることができません。全部の記事リンクを、ある1つのリンクに変換したいだけです。 #!/usr/bin/perl use XML::TreePP; use XML::FeedPP; my $feed = XML::FeedPP::RDF->new(); $feed->merge( "結合したいrssフィード1" ); $feed->merge( "結合したいrssフィード2" ); my $now = time(); $feed->sort_item(); $feed->pubDate( $now ); my $atom = $feed->to_file( "index.rdf", "UTF-8" ); print "Content-type: text/plain\n\n"; print "出力完了\n"; 使ってるレンタルサーバーはロリポップです。 複数のフィード(RSS、Atomなど)をまとめるCGI http://blog.audiofan.net/archives/491385.html [Perl] XML::FeedPP - RSS・RDF・Atomフィードの解析・生成・変換・結合 http://www.kawa.net/works/perl/feedpp/feedpp.html XML::FeedPP https://metacpan.org/pod/XML::FeedPP#feed-remove_item-index-or-link http://search.cpan.org/~kawasaki/XML-FeedPP-0.43/lib/XML/FeedPP.pm http://mevius.5ch.net/test/read.cgi/tech/1349538519/293
294: デフォルトの名無しさん [sage] 2014/06/10(火) 06:01:49.29 ID:hRaawaun >>293 WebProg http://nozomi.2ch.net/php/ http://mevius.5ch.net/test/read.cgi/tech/1349538519/294
295: デフォルトの名無しさん [sage] 2014/06/10(火) 12:30:22.68 ID:zpbxFFHG ttp://s1.gazo.cc/up/88224.jpg こういった10行で一組のデータの中に --- 市民の... yerles warrior --- というパターンが多くあります。 マッチ検索したいのは --- 市民の... dog warrior --- というパターンです。 "市民"という文字を見つけたら 2行下に "dog"という文字があるならば その、"市民の..."を出力して欲しいです。 ファイル読んで単純マッチするぐらいしか今はできません open (my $in , "<" , "./cdatan_5_101.s2"); while (<in>){ if (/yerles/){print "matched\n"} } close $in; } http://mevius.5ch.net/test/read.cgi/tech/1349538519/295
296: デフォルトの名無しさん [sage] 2014/06/10(火) 13:44:16.05 ID:kKsVvptA >>295 http://ideone.com/0A9TR0 http://mevius.5ch.net/test/read.cgi/tech/1349538519/296
297: デフォルトの名無しさん [sage] 2014/06/10(火) 13:58:26.18 ID:kKsVvptA 手抜きすぎた。 >>295 http://ideone.com/NUuEtp http://mevius.5ch.net/test/read.cgi/tech/1349538519/297
298: デフォルトの名無しさん [sage] 2014/06/10(火) 14:45:55.30 ID:zpbxFFHG 凄い。ありがとう。 出てきたshiftとか勉強してみます 感謝 http://mevius.5ch.net/test/read.cgi/tech/1349538519/298
299: デフォルトの名無しさん [sage] 2014/06/11(水) 22:22:53.08 ID:PCU6+AOL どこにshiftの出番があるのか?と思ったらそう言うことか。 普通に配列に突っ込んで、マイナスのインデクスでアクセスすりゃいいやん。 $ perl -Mvars=@a -lne 'push @a, $_ ; next if !/dog/ ; next if $a[-3] !~ /市民/ ; print $a[-3]' File メモリ喰いが気になるのなら、 $ perl -Mvars=%h -lne '$h{$.} = $_ if /市民/ ; next if !/dog/ ; next if ! defined $h{$. - 2} ; print $h{$. - 2}' File とか、で節約すりゃいい。、、、けど、今時そんなの気にする必要もないだろ 上のワンライナーでやってる事は、 $ perl -MO=Deparse -Mvars...略 でわかる。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/299
300: デフォルトの名無しさん [sage] 2014/06/12(木) 13:15:46.45 ID:qt4Roz23 恰好をつけるなら、リングバッファでも書くところですが、回答としては、あんまりだと思ったので。 2行固定なら、別に使わなくても。 perl -ne '($_, $x, $y) = ($x, $y, $_); $y =~ /dog/ && /市民/ && print' File 何も考えなくていいなら、正規表現でバッサリ。 perl -e 'print((local $/ = <>) =~ /(^.*市民.*\n).*\n.*dog/gm)' File http://mevius.5ch.net/test/read.cgi/tech/1349538519/300
301: デフォルトの名無しさん [sage] 2014/07/13(日) 23:15:08.85 ID:m+RTKRIb >>300 1ヵ月以上もお前のレスにレスがつかないのはなぜか分かる? お前みたいなゴミクズは誰も必要としてないからだよ。 一般社会ではあからさまに無視するわけにもいかないから当たり障りのない対応をしてもらってると思うけど、 お前ハッキリ言って迷惑だから。 ゴミクズはネットでもリアルでもできるだけ社会と接点持つな。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/301
302: デフォルトの名無しさん [sage] 2014/07/26(土) 13:51:21.84 ID:5yhnFgSu Test Summary Report ------------------- t/config-finder.t (Wstat: 512 Tests: 0 Failed: 0) Non-zero exit status: 2 Parse errors: Bad plan. You planned 26 tests but ran 0. Files=86, Tests=923, 636 wallclock secs ( 2.64 usr 1.67 sys + 247.77 cusr 297.98 csys = 550.05 CPU) Result: FAIL Failed 1/86 test programs. 0/923 subtests failed. Makefile:945: recipe for target 'test_classic' failed make: *** [test_classic] Error 255 PETDANCE/ack-2.12.tar.gz /usr/bin/make test -- NOT OK //hint// to see the cpan-testers results for installing this module, try: reports PETDANCE/ack-2.12.tar.gz Running make install make test had returned bad status, won't install without force Failed during this command: PETDANCE/ack-2.12.tar.gz : make_test NO Windous上のcygwinとLinuxでCPANのackをインストールしているところでつまずきました 上のエラーはcygwinの方のエラーです これは、curlを使えば回避できるそうですが http://d.hatena.ne.jp/katz_24/20130210/1366387522 setup.exeを利用したインストールでも何故かインストールができずに手詰まりになりました ack-2.12.tar.gz を回答してみても訳が分かりません ackをインストールする手はありますか? http://mevius.5ch.net/test/read.cgi/tech/1349538519/302
303: デフォルトの名無しさん [] 2014/07/26(土) 14:09:06.14 ID:mdOIZXZW make test had returned bad status, won't install without force まけ出来てるのならいんすこ自体は可能 http://mevius.5ch.net/test/read.cgi/tech/1349538519/303
304: デフォルトの名無しさん [sage] 2014/07/26(土) 15:10:46.74 ID:5yhnFgSu force installでcygwinの方に入れました 正常に動作します ありがとうございました Linuxの方は、手っ取り早く sudo aptitude install ack-grep しました おかげさまで両方にackが揃いました 感謝します http://mevius.5ch.net/test/read.cgi/tech/1349538519/304
305: デフォルトの名無しさん [sage] 2014/08/06(水) 20:37:58.86 ID:Wa4hIBKh xmlを取得して中身を s|。|。<br>|g; して句読点ごとに改行させたかったのですがどうしても出来ません なにか理由があるのでしょうか 初心者なもんで変な質問をしていたらすいません http://mevius.5ch.net/test/read.cgi/tech/1349538519/305
306: デフォルトの名無しさん [sage] 2014/08/06(水) 20:41:08.65 ID:itqhygIz 文字コード http://mevius.5ch.net/test/read.cgi/tech/1349538519/306
307: デフォルトの名無しさん [sage] 2014/08/06(水) 20:43:50.60 ID:E5F7+XJp エスパーじゃないんだから、そんな質問で答えれる訳ないだろ。 せめてサンプルとなる簡単なxmlを出せよ・・・ http://mevius.5ch.net/test/read.cgi/tech/1349538519/307
308: デフォルトの名無しさん [sage] 2014/08/06(水) 21:39:48.88 ID:Wa4hIBKh 申し訳ないです >>306 デコードはしています >>307 申し訳ありません wikipedia.simpleapi.net/api?keyword=Test&output=xml http://mevius.5ch.net/test/read.cgi/tech/1349538519/308
309: デフォルトの名無しさん [sage] 2014/08/06(水) 22:33:25.28 ID:E5F7+XJp >>308 テストした結果、普通に置き換えできます。 取得方法に問題があるんだろう。 ってか、こんな質問の仕方じゃスレ全部埋まるわ・・・ 問題が起きてるサンプルコード出してみ http://mevius.5ch.net/test/read.cgi/tech/1349538519/309
310: デフォルトの名無しさん [sage] 2014/08/06(水) 22:37:04.17 ID:itqhygIz >>308 ちげーよ utf8のファイルをeucのスクリプトでマッチしようとしたんじゃないの、ってこと http://mevius.5ch.net/test/read.cgi/tech/1349538519/310
311: デフォルトの名無しさん [sage] 2014/08/06(水) 22:48:45.57 ID:Wa4hIBKh >>310 shift-jisのスクリプトでマッチさせようとしました 不味かったでしょうか http://mevius.5ch.net/test/read.cgi/tech/1349538519/311
312: デフォルトの名無しさん [sage] 2014/08/06(水) 23:05:36.50 ID:itqhygIz >>311 なら、どっちかの文字コードにencodeして合わせる http://mevius.5ch.net/test/read.cgi/tech/1349538519/312
313: デフォルトの名無しさん [sage] 2014/08/06(水) 23:07:49.58 ID:E5F7+XJp いや、よほど特別な事情がない限りは utf-8 のソースにするべき。 http://d.hatena.ne.jp/perlcodesample/20091118/1246679588 この辺読んで理解するべき。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/313
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 210 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.010s