Happily, in Perl6 /|/ is a compile-time error. (Already works that way in PGE/Pugs.)

Note that (in P6) you can split on the string "|", which in this case would do what you want.