open(TL,"$path_to_lang/$thislang/open_file.txt");
while(<TL>){push(@LaNg,$_)}
&exec_lang;
$path_to_library.="/";
$param1 =~ s/\?.+$//;
$param1 =~ m!http://.+?/(.+)!;$file=$path_to_domain."/".$1;
	open(F,"$file");
		while(<F>){$FILE.=$_}
		if($FILE=~s!</textarea!<=textarea!ig){$talert=qq~alert("</textarea> $ini_text1 </textarea>")~}
&check_cookie;
&check_login;
if($buttons =~ /edit_file_plus/){$saveas=""}else{$saveas="none"}
if($demo_mode){
	$open1=qq~alert("DISABLED FOR DEMO")~;
}else{
	$open1=qq~document.forms[0].submit()~;
}
print "Content-type: text/html\n\n";
require "$htm/open_file.txt";
1;