perl6正则 4: before / after 代码断言: <?{}> / <!{}>

<?before>
<? befor XXX> 某字符在 xxx 之前

<?after >
<?after XXX> 某字符之后有XXX

对应的取反分别为:

<!before >
<!before XXX>   XXX之前没有

<!after>
<!after xxx> 某字符后面不是 xxx

say "foobar" ~~ /foo <!before baz>/; # -> foo
#baz之前不是foo
say "foobaz" ~~ /foo <!before baz>/; # -> Nil (regex failed)
#baz之前不是foo
say "foobar" ~~ /<!after foo> bar/; # -> Nil (regex failed)
#foo之后不是bar

除了before after, 还有就是代码块类的：

<?{code }>

<!{code }>