#!/usr/bin/perl -wl

    my $str = 'C:\Program Files\Microsoft Office\Office\Excel.exe';
       $str = quotemeta $str;

    print $str;

    __END__
    prints:

    C\:\\Program\ Files\\Microsoft\ Office\\Office\\Excel\.exe

##</code><code>##

    $str =~ s[\\][/]g;