$name =~ s|\\|/|; # substitute forward slash for back slashes, icky but don't know a better way.

##</code><code>##

    $name =~ tr{\\}{/};