@pathtofile = split(/\\/, $path);
$file =  pop(@pathtofile);

$path here can be parsed from the form