use File::Spec;
		
		$bif_path = "/foo/go/do";
		$bif_path = File::Spec->canonpath ($bif_path);
		print "canonpath: $bif_path\n";
		$bif_path = File::Spec->catfile ('', $bif_path);
		print "catfile: $bif_path\n";

##</code><code>##

"\\foo\go\do"

##</code><code>##

"\foo\go\do"