if($demo_mode){
print "Content-type: text/html\n\n";
print qq~<script language=javascript>alert("DISABLED FOR DEMO");</script>~;
}else{

$old=$param1;
$param1 =~ m!([^/:\\]*)$!; #capture file name
$f_name = $1;
$param1=~s!$url_to_domain!$path_to_domain!;
$param1=~m!(.+)/.+?$!;$dir=$1;
$nu=$param1;
$nu=~s`$f_name`$param2`;
rename($param1,$nu);
$nu=~s!$path_to_domain!$url_to_domain!;
print "Content-type: text/html\n\n";
print qq~<script language=javascript>alert("$old\\n\\nRenamed To\\n\\n$nu");parent.pad.location="$url_to_editor?path_tree=$dir=$param3";parent. resetbut();if(parent.document.getElementById("open_url")){parent.document.getElementById("open_url").value=""}</script>~;
}#else demo
1;