in reply to match function
Just for the sake of completeness...
I think Corion has already alluded to this, but the [a|A] character class consists in the '|' (pipe) and 'a' and 'A' characters. The | regex alternation metacharacter is not meta inside a character class. See Bracketed Character Classes in perlrecharclass.
Give a man a fish: <%-{-{-{-<
|
|---|