Use $x = qr/A\\B/ instead.
In reply to Re: Strange backslash in regexp behaviour by JavaFan in thread Strange backslash in regexp behaviour by Anonymous Monk