Works for me

>perl -wle"print -e '\\\\tribble\\c$\\bin' ?1:0"
1

>perl -wle"print -e '\\\\tribble\\c$\\bla' ?1:0"
0

>perl -wle"print -e '\\\\baragon\\c$\\bin' ?1:0"
1

>perl -wle"print -e '\\\\baragon\\c$\\bla' ?1:0"
0
[download]

Mind you, the code you posted gives syntax errors.

>perl -e"-e \\\\server\\dir1\\dir2"
Backslash found where operator expected at -e line 1, near "server\"
Backslash found where operator expected at -e line 1, near "dir1\"
syntax error at -e line 1, near "server\"
Execution of -e aborted due to compilation errors.
[download]

That's not what you meant, right?