- or download this
my $path = "C:\\temp\\dest";
$path =~ s/C:\\temp//i;
print "new path: $path\n";
- or download this
my $srcDir = "C:\\temp";
my $path = "C:\\temp\\dest";
...
$path =~ s/$srcDir//i;
print "new path: $path\n";
- or download this
$path =~ s/$srcDir//i or die;
- or download this
my $srcDir = "C:\\temp";
my $destDir = "C:\\temp2";
...
$path =~ s/$srcDir/$destDir/i or die;
print "new path: $path\n";