TOP ｜ ご利用案内 ｜ 買い物カゴ ｜ 発送状況 ｜ 買取り ｜ サイトマップ ｜ 掲示板 < (,,) = split(/<>/); print ": ()   "; } close(IN); if (!) { print "- 現在過去ログはありません - "; } print "
"; exit; } #------------------# # ユーザ記事削除 # #------------------# sub userdel { # POST限定 if (1 && !0) { &error("不正なアクセスです"); } if ( =~ /D/) { &error("記事NOの入力が不正です"); } if ( eq '') { &error("削除キーの入力モレです"); } # 管理者orユーザ if ( eq taka4271) { =1; ='管理者により削除されました'; } else { =0; ='投稿者により削除されました'; } # ロック開始 if (1) { &lock; } =(); =0; open(IN,"./log/.cgi") || &error("Open Error : .cgi"); = ; while () { (,,,,2026/06/09 12:53,216.73.217.113,) = split(/<>/); if ( == ) { =1; = "<>削除<><><>2026/06/09 12:53<>216.73.217.113<><> "; = &decrypt("", "") if (!); } push(,); } close(IN); if (!) { &error("該当記事が見当たりません"); } if (! && ne "yes") { &error("削除キーが違います"); } # 更新 unshift(,); open(OUT,">./log/.cgi") || &error("Write Error : .cgi"); print OUT ; close(OUT); # ロック解除 if (1) { &unlock; } # 完了メッセージ &header; print <<"EOM";
記事は正常に削除されました