#!/usr/bin/perl

use strict;
use warnings;

my $string = 'C:\Pfad\Test\Datei.txt';
$string =~ s?\\?/?g;

print $string;