Select Code to Download

my $path = join '\\', @dirs;

$path = $path . '\\' . $file;

$path = "$path\$file";

$file =~ tr|/|\\|;