&check_cookie;
&check_login;
open(TL,"$path_to_lang/$thislang/upload_file.txt");
while(<TL>){push(@LaNg,$_)}
&exec_lang;
if($image_magick_check){
	$turnoff="check_bmp();save_it()";
}else{
	$turnoff="save_it()";
}
if($usermb =~ /\d+/){
&allocation;
$rs=295;
}else{
$rs=275;
}

if($param1 ne "wiz"){$resize=qq~hei=$rs-document.body.clientHeight
dialogHeight=parseInt(dialogHeight)+hei+"px"~}
if($demo_mode){
	$demo1=qq~'alert(\\"DISABLED FOR DEMO\\")'~;
	$demo2=qq~'alert(\\"DISABLED FOR DEMO\\")'~;
	$demo3=qq~alert("DISABLED FOR DEMO")~;
	$demo4=qq~"alert('DISABLED FOR DEMO')"~;
}else{
	$demo1=qq~window.close();dialogArguments.document.getElementById('wait1').style.display='';dialogArguments.document.forms[0].submit()~;
	$demo2=qq~dialogArguments.nufolder=document.forms[0].nufolder.value;dialogArguments.create_folder();window.close()~;
	$demo3=qq~hole.location="$url_to_editor?delete_folder="+pad.urldir ;
document.getElementById("del_folder").value="$js13";
document.getElementById("del_folder").disabled=true~;
	$demo4=qq~"this.disabled=true;$turnoff "~;
}
if($buttons =~ /folder_delete/){$DF="hidden"}else{$DF="visible"}

print "Content-type: text/html\n\n";
open(I,"$htm/uploadfile.txt");
while(<I>){
s/\$(\w+)/${$1}/eg;
print
}
1;