| Subject: | Bug in fail/fail_with tests on Win32 |
In fail.t this line:
like $exception, qr/\Q$exception_pat\E at $file line $line/ =>
"Right message";
backslashes in $file causes pattern to not match. Escape should include
file:
like $exception, qr/\Q$exception_pat at $file\E line $line/ =>
"Right message";
Same thing in fail_with.t:
like $exception, qr/\Q$exception_pat\E at $file line $line/ =>
"Right message";
should be:
like $exception, qr/\Q$exception_pat at $file\E line $line\E/ =>
"Right message";