Select Code to Download

use YAPE::Regex::Explain;
print YAPE::Regex::Explain->new("A\\B")->explain;
__END__
...
----------------------------------------------------------------------
)                        end of grouping
----------------------------------------------------------------------

use YAPE::Regex::Explain;
print YAPE::Regex::Explain->new("\\B")->explain;
...
----------------------------------------------------------------------
)                        end of grouping
----------------------------------------------------------------------

use re 'debug';
$x = "A\\B";
$y = "Here is A\\B";
...
                            failed...
Match failed
nFreeing REx: `"A\\B"'

use re 'debug';
$x = "\\B";
$y = "Here is \\B";
...
   1 <H> <ere is \B>      |  2:  END
Match successful!
yFreeing REx: `"\\B"'