[過去ﾛｸﾞ] Perlについての質問箱 64箱目 (1002ﾚｽ)

Perlについての質問箱 64箱目 http://mevius.5ch.net/test/read.cgi/tech/1548981877/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 ﾚｽ栞

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

643: デフォルトの名無しさん [sage] 2020/08/15(土) 20:03:08.33 ID:UM/CpThf なんだこの糞改行(´・ω・｀) # 全部のpタグの中身を引っ掛ける my @p_list = $html =~ /<p>(.+?)<\/p>/g; # 引っかかった数取得 my $size = int(@p_list); # 前半と後半に分けて突っ込む my @mae = @p_list[0..int($size/2)-1]; my @ato = @p_list[int($size/2)..$size-1]; # 結果表示テスト print Dumper([\@mae, \@ato]); http://mevius.5ch.net/test/read.cgi/tech/1548981877/643

659: 636 [] 2020/08/16(日) 20:53:31.17 ID:we+09hKc 返信が遅くなってすいません >>640,643,646 勉強になりました ありがとうございました http://mevius.5ch.net/test/read.cgi/tech/1548981877/659

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.028s