Help for this page
$ perl -MO=Deparse -e 'm/\|/' /\|/; $ perl -MO=Deparse -e 'm|\||' /|/;
$ perl -MO=Deparse -e 'm|\||x' /|/x; ... $ perl -MO=Deparse -e 'm|\\\||x' /\\|/x;
$ perl -MO=Deparse -e 'm|[\|]|' /[|]/;