print "Content-type: text/html\n\n";
open(USR,"$path_to_users");
while(<USR>){
    if(/^$param1=/){
        ($un,$pw,$user_root,$buttons,$imagesize,$usermb,$user_files,$user_email,$super,$auths,$usrtype,$mode)=split(/=/);
		last;
    }
}
if($un){
	print qq~<script language=javascript>parent.document.getElementById("username2").value=parent.document.getElementById("username").value;parent.document.getElementById("login_layer").style.display='none';parent.document.getElementById("chngpw").style.display='';parent.document.body.style.cursor='default';parent.document.forms[0].login_butt.disabled=false;parent.document.forms[0].emailme.checked=false</script>~;
}else{
	print qq~<script language=javascript>alert("$param1 $com_not_a_user");parent.document.body.style.cursor='default';parent.document.forms[0].login_butt.disabled=false;parent.document.forms[0].emailme.checked=false</script>~;
}
1;