$filename = $query->param("Resume_File"); $filename =~ s/.*[\/\\](.*)/$1/; open UPLOADFILE, ">$upload_dir/$filename";