¢£ WebProg ‰SŽÒ‚ ..
302:nobody‚³‚ñ
06/08/18 00:38:01
ƒtƒH[ƒ€‚Ŏ󂯎æ‚Á‚½ƒ}ƒ‹ƒ`ƒoƒCƒg•¶Žš‚ðƒT[ƒoã‚Ìtxtƒtƒ@ƒCƒ‹‚É‘‚«ž‚ÝA
d•¡‚µ‚½ê‡‚ÍŒx‚·‚邯‚¢‚¤perlƒvƒƒOƒ‰ƒ€‚ðì‚Á‚Ă݂½‚̂ł·‚ªA•¶Žš‚É‚æ‚Á‚ăGƒ‰[‚ªo‚Ä‚µ‚Ü‚¢‚Ü‚·B
‚â‚Í‚èƒGƒ“ƒR[ƒh‚µ‚È‚¢‚ƃGƒ‰[‚ª‚łĂµ‚Ü‚¤‚̂łµ‚傤‚©H(Ž¿–â‚P)
‚Ü‚½A‘‚«ž‚݂ͳí‚És‚í‚ê•\ަ‚µ‚½ê‡‚à³í‚Ȃ̂ł·‚ªA
d•¡‚ªŒx‚³‚ꂸ‰½“x‚à‘‚«ž‚ñ‚Å‚µ‚Ü‚¤ê‡‚ª‚ ‚é‚̂ł·‚ª‚Ç‚¤‚¢‚¤‚±‚Ƃłµ‚傤‚©H(Ž¿–â‚Q)
‘‚«ž‚Ý‚ÍopenŠÖ”‚Ås‚Á‚Ä‚¢‚Ü‚·Bd•¡Œxƒ‹[ƒ`ƒ“‚͈ȉº‚Ì’Ê‚è‚Å‚·B
open (FH, "kakiko.txt"); #kakiko.txt‚Í‘‚«ž‚ÞƒeƒLƒXƒgƒtƒ@ƒCƒ‹
@sinsei = <FH>;
close(FH);
$sinsei = join ":", @sinsei;
if ($sinsei =~ /$name/) { #$name‚̓tƒH[ƒ€‚©‚çŽó‚¯Žæ‚Á‚½•¶Žš—ñ
print "Content-type: text/html\n\n";
print "<html><head><title></title></head><body>";
print "<h3>‘‚«ž‚Ýς݂ł·B\n</h3>";
print "</body></html>";;
}
ƒGƒ“ƒR[ƒh‚³‚ê‚Ä‚¢‚È‚¢•¶Žš—ñ“¯Žm‚¾‚ÆŒ³‚ª“¯‚¶•¶Žš—ñ‚Å‚àƒpƒ^[ƒ“ƒ}ƒbƒ`‰‰ŽZŽq‚ªŒø‚©‚È‚¢‚̂łµ‚傤‚©H
ƒT[ƒo‚ÍUNIXƒT[ƒo‚Å‚·B
‚²‰ñ“š‚̂ق¤‚æ‚낵‚‚¨Šè‚¢’v‚µ‚Ü‚·Bm(_ _)m
ŽŸƒy[ƒW‘±‚«‚ð•\ަ1‚ð•\ަÅVƒŒƒX•\ަƒXƒŒƒbƒh‚ÌŒŸõ—ÞŽ—ƒXƒŒˆê——˜b‘è‚̃jƒ…[ƒX‚¨‚Ü‚©‚¹ƒŠƒXƒg¥ƒIƒvƒVƒ‡ƒ“‚ð•\ަ‰É‚‚Ԃµ2ch
5328“ú‘O‚ÉXV/239 KB
’S“–:undef