or download this
>perl -MYAPE::Regex::Explain -e "print YAPE::Regex::Explain->new(shift
+)->explain" "(?<=N)(-+)(?=B)"
...
----------------------------------------------------------------------
) end of grouping
----------------------------------------------------------------------