Another approach to this is to use the "tr" command:

$Doc =~ tr/\//\\/;
[download]

The "tr" command is usually more efficient for character substitutions. You can also use a delimiter other than slash (/) as GrandFather suggested. In this instance, I prefer using paired delimiters like:

$Doc =~ tr{/}{\\};
[download]