Select Code to Download

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

"\\foo\go\do"

"\foo\go\do"