šŽO@y ƒXƒNƒŠƒvƒg‰ ..
[2ch|₯Menu]
136:‚¨Šθ‚’‚΅‚ά‚·
04/05/10 23:20
Ž©•ͺ‚Εƒtƒ@ƒCƒ‹ƒƒbƒNˆ—‚Ύ‚―‘‚’‚Δ‚έ‚½‚Μ‚Ε‚·‚ͺA
112s–Ϊ‚©‚η‚π

sub outputdata{
# Œ»έ‚ΜŽžŠΤ‚πŽζ“Ύ
($sec,$min,$hour,$day,$mon,$year) = localtime(time);
$mon++;
$year += 1900;
$stmp = sprintf("%04d/%02d/%02d-%02d:%02d:%02d",$year,$mon,$day,$hour,$min,$sec);

open (DAT,">>$output");
&body;
flock(DAT,2);
print DAT "$body,$stmp\r\n";
flock(DAT,8);
close (DAT);
}

‚±‚€‚΅‚Δ‚έ‚ά‚΅‚½B‚±‚κ‚Ύ‚―‚Ε‚’‚’‚Μ‚Ε‚΅‚ε‚€‚©H


ŽŸƒy[ƒW
‘±‚«‚π•\ަ
1‚π•\ަ
ΕVƒŒƒX•\ަ
ƒXƒŒƒbƒh‚ΜŒŸυ
—ήŽ—ƒXƒŒˆκ——
˜b‘θ‚Μƒjƒ…[ƒX
‚¨‚ά‚©‚ΉƒŠƒXƒg
₯ƒIƒvƒVƒ‡ƒ“‚π•\ަ
‰Ι‚Β‚Τ‚΅2ch

3981“ϊ‘O‚ɍXV/341 KB
’S“–:undef