教えてPerl
http://toro.2ch.net/test/read.cgi/news2/1323135099/933
933 名前:K5 ◆ZrPJFvslEyUG [sage] 投稿日:2012/01/04(水) 02:57:15.93 ID:tK3RmaGW
>>1-10000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
>>1-10000000000000000000000000000000000000000000000000000000000000000000000001
1-10000000000000000000000000000000000000000000000000000000000000000000000001
>>1-1000000000000000000000000000000000000000000000000000
なんだが、こんなコードになっている
# >>nnn
$GB->{FORM}->{'MESSAGE'} =~ s/>>([0-9]+)(?![-\d])/<a href="..\/test\/read.cgi\/$GB->{FORM}->{'bbs'}\/$GB->{FORM}->{'key'}\/$1" target="_blank">>>$1<\/a>/g;
# >>nnn-nnn
$GB->{FORM}->{'MESSAGE'} =~ s/>>([0-9]+)\-([0-9]+)/<a href="..\/test\/read.cgi\/$GB->{FORM}->{'bbs'}\/$GB->{FORM}->{'key'}\/$1-$2" target="_blank">>>$1-$2<\/a>/g;
これを >>8000 とかありえない場合は置き換えしないようにするには Perlでどうやって書くの?
今日も元気に残件なす 11
■ このスレッドは過去ログ倉庫に格納されています
438きづね
2012/01/04(水) 03:19:34.89ID:Nvb+CZsA0■ このスレッドは過去ログ倉庫に格納されています
ニュース
- 【食糧】スーパーのコメ5kg4000円突破 値上がり続く 史上最高値を更新 農水省★3 [シャチ★]
- 【高知】放課後はキャバクラ嬢、小学校の新人教諭を停職処分 「いざ給与をもらうと物足りず」 [牛乳トースト★]
- 国民民主・玉木代表「石破氏が首相を続けることは難しい」「“財源がない”などと言いながら10万円をポン」 [お断り★]
- 【MLB】大谷翔平に代打送られ、会場から漏れた『えー』 視聴者から「失礼すぎる」「気持ちは分かりますが」「リスペクトに欠ける」 [冬月記者★]
- 【JA全農】「備蓄米」明記しないよう販売要請へ 取り合いになる可能性懸念 “スポット価格”は依然高止まりか ★2 [牛乳トースト★]
- マツコ 世田谷区の住民について「プライドが凄い」と思ったこと明かす「東京代表と思ってる?」「港区にも勝ってると思ってる」 [muffin★]