use strict;
use warnings;
use YAPE::Regex::Explain;

for my $regexp ('\babc\z','\babc\Z') {
    print YAPE::Regex::Explain->new($regexp)->explain, "\n"x3;
}