$file=File::Spec->catfile('c:','path',with spaces',to','file');
$file="\'$file\'";