ﾚｽ書き込み

ｽﾚへ戻る 写 ﾚｽ栞 ﾚｽ消

---

七行プログラミング

PC,ｽﾏﾎ,PHSは ULA べっかんこ 公式(ｽﾏﾎ) 公式(PC) で書き込んでください｡

名前
ﾒｰﾙ
引用切替：ﾚｽｱﾝｶｰのみ
>>270 > 息抜きにテキストカウンタ。お題がお題なので、今日/昨日/総計のカウントと、 > ランダムワード表示機能付けてまだ一行余ってるけど。 > > --- 7rwcntr.cgi --- > #!/usr/bin/perl > sub P{seek local*F=pop,0,0;print F@_}sub o{open(local*F,"+<@_")||die;eval{flock > F,2};*F}sub j{(localtime((stat pop)[9]))[3]}$l=@l=<$_>,chomp($r.=$l[rand$l])for > map{o$_}sort<?.dat>;$A=o"all.dat";$a=<$A>+1;j($T=o"tday.dat")==j($Y=o"yday.dat" > )?do{P$t=<$T>+1,$T;$y=<$Y>}:do{P$y=<$T>,$Y;P$t=1,$T};P$a,$A;$s=@ARGV?javascript > :plain;printf"Content-Type: text/$s\n\n".join('',<DATA>),$r,$a,$t,$y > __END__ > > 空ファイル all.dat, tday.dat, yday.dat を予め用意。 > ?.dat というファイルがあると、そのファイルから一行ランダムに選んで表示。 > ?.dat が複数あった場合は、各ファイルからランダムに取り出して繋げて表示。 > > 例えば 0.dat に人名、1.dat に場所、2.dat に行動のリストをそれぞれ用意 > しておけば、「誰々が何処で何々」のようなランダム文を表示します。
ﾛｰｶﾙﾙｰﾙ SETTING.TXT

---

他の携帯ﾌﾞﾗｳｻﾞのﾚｽ書き込みﾌｫｰﾑはこちら｡書き込み設定で書き込みｻｲﾄの設定ができます｡
・ULA
・べっかんこ(身代わりの術)
・べっかんこ(通常)
・公式(ｽﾏﾎ)
・公式(PC)[PC,ｽﾏﾎ,PHS可]

---

書き込み設定(板別)で板別の名前とﾒｰﾙを設定できます｡

---

ﾒﾓ帳

(0/65535文字)

---

上下板覧索設栞歴

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.007s