Просмотр файла znak v1.2 modified by Kronas/clean.php

<?
Error_Reporting(E_ALL & ~E_NOTICE);
header("Content-type:text/vnd.wap.wml;charset=utf-8");
print "<?xml version=\"1.0\" encoding=\"utf-8\"?>";
print "<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.2//EN\" \"http://www.wapforum.org/DTD/wml12.dtd\">";
print "<wml>";
print "<card id=\"index\" title=\"DELETE\">";
print "<p align=\"center\"><small>";

$dir = opendir ("base");
while ( $file = readdir ($dir))
{if (( $file != ".") && ($file != ".."))
{unlink ("base/$file");}}
closedir ($dir);
$add1=@fopen("posl/m.txt","w");
$add2=@fopen("posl/zh.txt","w");
$add3=@fopen("login_base.txt","w");
$add4=@fopen("vsego.txt","w");
$zero=0;
fputs ($add4, $zero);
$add5=@fopen("m.txt","w");
$add6=@fopen("zh.txt","w");

print "OK!";

print "</small></p></card></wml>";
?>