if($demo_mode){
print "Content-type: text/html\n\n";
print qq~
~;
}else{
&$param2;
sub x755{chmod(0755,"$param1")}
sub x666{chmod(0666,"$param1")}
sub x644{chmod(0644,"$param1")}
sub x600{chmod(0600,"$param1")}
$para=substr($param2,1);
print "Content-type: text/html\n\n";
print qq~
~;
}#else
1;