knoppix@Microknoppix:~$ perl -E '
> $bp = q{\\dirA\dirB\dirC};
> say $bp;'
\dirA\dirB\dirC
knoppix@Microknoppix:~$ perl -E '
$bp = q{\\\dirA\dirB\dirC};
say $bp;'
\\dirA\dirB\dirC
knoppix@Microknoppix:~$ perl -E '
$bp = q{\\\\dirA\dirB\dirC};
say $bp;'
\\dirA\dirB\dirC
knoppix@Microknoppix:~$ perl -E '
$bp = q{\\\\dirA\\dirB\\dirC};
say $bp;'
\\dirA\dirB\dirC
knoppix@Microknoppix:~$