Perlについての質問箱 65箱目 (112ﾚｽ)
Perlについての質問箱 65箱目 http://mevius.5ch.net/test/read.cgi/tech/1616856733/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
25: デフォルトの名無しさん [] 2021/09/12(日) 05:51:13.73 ID:zHKafq1A あ、ごめん。| の所は \| ね。 http://mevius.5ch.net/test/read.cgi/tech/1616856733/25
26: デフォルトの名無しさん [] 2021/09/12(日) 05:52:45.30 ID:zHKafq1A [と]も直前に\要るね。 http://mevius.5ch.net/test/read.cgi/tech/1616856733/26
27: デフォルトの名無しさん [sage] 2021/09/12(日) 07:06:52.84 ID:jZMYjdNi なぜ、Perl のXML パーサーを使わないの？ 例えばRuby なら、Nokogiri と言う、HTML/XML パーサーがある。 内部的には、Libxml2 モジュールを使っているのかな？ たぶん、Perlにもあるはず http://mevius.5ch.net/test/read.cgi/tech/1616856733/27
28: デフォルトの名無しさん [sage] 2021/09/12(日) 15:32:25.57 ID:89s8PaYB パースするのがXMLじゃないからだな。 http://mevius.5ch.net/test/read.cgi/tech/1616856733/28
29: デフォルトの名無しさん [] 2021/09/13(月) 10:13:09.30 ID:E86z1ItW s/\[\[(.*?(\|(`*?)))\]\]/$3 ? $3 : $1/ge のパターンで試してみましたが、結果は「インプット メソッド エディタ|IME」 と置換されてしまいます。 (.*?)の部分で、|以降の文字列も含めてマッチングされているようで それ以降のパターンマッチが効いてないようです。 http://mevius.5ch.net/test/read.cgi/tech/1616856733/29
30: デフォルトの名無しさん [sage] 2021/09/13(月) 10:38:07.93 ID:AXNI3otr このへんで確認しろ。https://qiita.com/aqril_1132/items/c185c7ad84c129e5a2df http://mevius.5ch.net/test/read.cgi/tech/1616856733/30
31: デフォルトの名無しさん [sage] 2021/09/13(月) 23:15:02.86 ID:vef3NqnY strawberry perl が34をリリースしないのはなぜだ http://mevius.5ch.net/test/read.cgi/tech/1616856733/31
32: デフォルトの名無しさん [sage] 2021/09/15(水) 19:04:24.79 ID:fHmj5hYp スクレイピングすると地獄へ落ちるって本当ですか？ http://mevius.5ch.net/test/read.cgi/tech/1616856733/32
33: デフォルトの名無しさん [sage] 2021/09/15(水) 23:51:59.00 ID:3vtMVT28 落ちたり落ちなかったり http://mevius.5ch.net/test/read.cgi/tech/1616856733/33
34: デフォルトの名無しさん [] 2021/09/15(水) 23:54:27.28 ID:3vtMVT28 >>29 それ . が ` になってるよ。直してやってみたらちゃんとできたよ。 $ echo '[[インプット メソッド エディタ|IME]]' | perl -pe 's/\[\[(.*?(\|(.*?)))\]\]/$3 ? $3 : $1/ge' IME $ http://mevius.5ch.net/test/read.cgi/tech/1616856733/34
35: デフォルトの名無しさん [sage] 2021/09/18(土) 03:37:45.50 ID:YPBxfQEw スクレイピングの勉強するのですが、下手するとF5アタックになるとかの法的リスクと回避法を重視している入門書ってありますか？ 今の所やりたいことは、特定の市町村の5年分気温気象データを収集して自分用に加工 近所のコインランドリーの稼働データを集計して空いてる確率が高い時間帯を調べるの2つです 前者は膨大なデータを取得する必要があります 後者は10分から20分おきにアクセスすることになります http://mevius.5ch.net/test/read.cgi/tech/1616856733/35
36: デフォルトの名無しさん [sage] 2021/09/18(土) 03:45:17.73 ID:VuuEM7MI まるぽ http://mevius.5ch.net/test/read.cgi/tech/1616856733/36
37: デフォルトの名無しさん [sage] 2021/09/18(土) 18:17:05.22 ID:J85RgKD5 頭のおかしい人に以下のようなことを言われました >>基本、スクレイピングは営業妨害との戦い。 >>どの本にも、そう書いてある。 >>スクレイピングを推奨する本はない 具体的な書籍名を教えてください >>5ch は、マルチポスト禁止！ >>同じ質問を、複数のスレや外部のサイトに書いてはいけない どこでそんなルールが決まっているのでしょうか？ http://mevius.5ch.net/test/read.cgi/tech/1616856733/37
38: デフォルトの名無しさん [sage] 2021/10/02(土) 06:38:43.82 ID:b+9bP+Kg socketでデータを受信すると、 データの途中に「残りバイト数」が挿入されてしまうことがあるんだけど、これはどう取り除けばいいの？ 例えばこんな感じになる wtjjpodjtjtjaajjgjjaatwdjjg@gptjwttdmttjmttpwm'jajt 1f 1234567890123456789012345678901 残りバイト数(1f)を16進数で表した文字列が挿入されてる 元々こういうデータだった場合と、挿入されてこうなった場合の区別が付かない readline()でもread()でも結果は同じだった http://mevius.5ch.net/test/read.cg
i/tech/1616856733/38
39: デフォルトの名無しさん [sage] 2021/10/02(土) 14:54:42.04 ID:lWVjrMOX >>38 なにそれ？文字で挿入されるの？そんなの初めて聞いたなあ。送る側で入れてるだけなのでは？(そうでなければ呼んでるライブラリが何かおかしいか) socket 関係はバッファリング避けるために sysread() 使った方が良い場合があるよ。 select で入力待ちをした後で読み込みとかね。 後は気を付けるとしたらノンブロッキングにしてるかどうかかな。 http://mevius.5ch.net/test/read.cgi/tech/1616856733/39
40: デフォルトの名無しさん [] 2021/10/03(日) 14:58:34.95 ID:ngVDhrCg activeperlからStrawberryperlへ移行を検討しているのですが、 activeperlで使用しているモジュール（ Win32::EventLog::Message）が cpanから削除されておりbackpanには残っていました。 https://cpan.metacpan.org/authors/id/D/DA/DAVEROTH/ 上記から、Win32-EventLog-Message.tar.gzはダウンロードできたのですが、 当方perl初心者でStrawberryperlへのインストール方法がわからず困っております。 どなたかインストール方法についてご教授お願い致します http://mevius.
5ch.net/test/read.cgi/tech/1616856733/40
41: 38 [sage] 2021/10/03(日) 15:42:34.37 ID:Etawdk1b お騒がせしました Transfer-Encording: chunked ってやつだった これかどうかを確認して別処理か…面倒くさあい http://mevius.5ch.net/test/read.cgi/tech/1616856733/41
42: デフォルトの名無しさん [] 2021/10/03(日) 20:15:27.91 ID:s9ykO0bu >>40 マジレスするとperlを捨てるチャンス http://mevius.5ch.net/test/read.cgi/tech/1616856733/42
43: デフォルトの名無しさん [sage] 2021/10/03(日) 20:18:20.58 ID:prztZm/y >>42 そのかわりに何を勧めんの？ Windowsのイベントログを扱いたいヤツに。 http://mevius.5ch.net/test/read.cgi/tech/1616856733/43
44: デフォルトの名無しさん [] 2021/10/03(日) 22:00:09.32 ID:ngVDhrCg 40です。 通常Makefile.PLでインストールするようなのですが、 上記tar.gzには、Makefile.PLがなく、 Message.pmがあるのですが、 これは、strawberryperlにはインストールできないのでしょうか？ http://mevius.5ch.net/test/read.cgi/tech/1616856733/44
45: デフォルトの名無しさん [sage] 2021/10/03(日) 22:14:43.18 ID:BlQUkwCi できるかどうか自分で試すしかない 他人にやってもらおうってのは虫が良すぎ http://mevius.5ch.net/test/read.cgi/tech/1616856733/45
46: デフォルトの名無しさん [sage] 2021/10/21(木) 12:31:10.82 ID:gLUi04Um my $str = "<img src=\"./test1.png\" style=\"width:100px;height:100px\">"; ./test1.pngの部分を./test2.pngに置換するにはどうやればいいんですか？ my $str =~ s/test1.png/test2.png/g;というのじゃなくてtest1.pngの部分がどんな 画像URLでも置換できるように http://mevius.5ch.net/test/read.cgi/tech/1616856733/46
47: デフォルトの名無しさん [sage] 2021/10/21(木) 12:49:12.67 ID:hpQkeFJy test2.pngを変数にすればいいだけ http://mevius.5ch.net/test/read.cgi/tech/1616856733/47
48: デフォルトの名無しさん [sage] 2021/10/21(木) 12:53:02.13 ID:gLUi04Um いやそうじゃなくて正規表現使ったやつで http://mevius.5ch.net/test/read.cgi/tech/1616856733/48
49: デフォルトの名無しさん [sage] 2021/10/21(木) 13:11:31.93 ID:hpQkeFJy s/src=".+?"/src="test2.png"/ http://mevius.5ch.net/test/read.cgi/tech/1616856733/49
50: デフォルトの名無しさん [sage] 2021/11/08(月) 18:04:06.58 ID:H7HFgRE2 {a}ab{abc} {}で囲まれたaだけdに置き換えたい どうやればいいんですか？ {d}ab{dbc}になればいいってこと http://mevius.5ch.net/test/read.cgi/tech/1616856733/50
51: デフォルトの名無しさん [sage] 2021/11/08(月) 18:59:06.40 ID:JELTvgr2 それだけじゃ分かんない 全ての条件を書かないと それが解なんだけどね http://mevius.5ch.net/test/read.cgi/tech/1616856733/51
52: デフォルトの名無しさん [sage] 2021/11/08(月) 22:10:38.33 ID:H7HFgRE2 本当にやりたいのは my $line = "<img src='aaa.png' width='300' height='200'> 画像説明"; <>の中にある全ての を半角スペースに置き換えたいっす 実行結果は<img src='aaa.png' width='300' height='200'> 画像説明となればいいっす 送信したときブラウザが勝手に半角スペースを に変換しちゃうみたいなのでタグ内の半角スペースだけ元に戻したいから http://mevius.5
ch.net/test/read.cgi/tech/1616856733/52
53: デフォルトの名無しさん [sage] 2021/11/09(火) 00:02:06.84 ID:J0R6dl97 sub f { my $s = shift; $s =~ s/ / /g; return "<$s>"; } $line =~ s/<(.+?)>/f($1)/eg; http://mevius.5ch.net/test/read.cgi/tech/1616856733/53
54: デフォルトの名無しさん [sage] 2021/11/09(火) 00:03:21.78 ID:J0R6dl97 sub f { my $s = shift; $s =~ s/＆＃160;/ /g; return "<$s>"; } $line =~ s/<(.+?)>/f($1)/eg; http://mevius.5ch.net/test/read.cgi/tech/1616856733/54
ﾒﾓ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 58 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.006s