Select Code to Download

my $script_dir = 'C:\\temp\\\\';
print "1. $script_dir\n";

...

$script_dir =~ s{/$}{}g;
print "2. $script_dir\n";

$script_dir =~ tr{\\}{/}s;

$script_dir =~ s{\\+(?=(.)?)}{"/"x defined $1}ge;

$_ = s/\\+$//r =~ s{\\+}{/}gr for $script_dir;