if($uploadpassword eq ""){
    $split =~ s/<;!--P(.+)P-->;//gs;
}else{
    $split =~ s/<;!--P(.+)P-->;/$1/gs;
}
if($deletepassword eq ""){
    $split3 =~ s/<;!--DP(.+)DP-->;//gs;
}else{
    $split3 =~ s/<;!--DP(.+)DP-->;/$1/gs;
}
if($renamefile eq "1"){
    $split =~ s/<;!--N(.+)N-->;//gs;
}else{
    $split =~ s/<;!--N(.+)N-->;/$1/gs;
}
if($description eq "1"){
    $split =~ s/<;!--D(.+)D-->;//gs;
}else{
    $split =~ s/<;!--D(.+)D-->;/$1/gs;
}