c:\@Work\Perl>perl -wMstrict -le "my $x = qq{Z:\/Partners\/Wilsons\/2push_test}; my $y = 'Z:\Partners\Wilsons\2push_test'; ;; print qq{'$x' '$y'}; die 'not equivalent!' unless $x eq $y; " 'Z:/Partners/Wilsons/2push_test' 'Z:\Partners\Wilsons\2push_test' not equivalent! at -e line 1.