The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
/\s(<[^>]*>)*\\(<[^>]*>)*\s(<[^>]*>\s)*(<[^>]*>)*\/(<[^>]*>)*\s/ @name = \<>/
/\s(<[^>]*>)*\|(<[^>]*>)*\s(<[^>]*>\s)*(<[^>]*>)*\((<[^>]*>)*\s/ @name = |<>(
/\s(<[^>]*>)*\[(<[^>]*>)*\s(<[^>]*>\s)*(<[^>]*>)*\](<[^>]*>)*\s/ @name = [<>]
/\s(<[^>]*>)*\{(<[^>]*>)*\s(<[^>]*>\s)*(<[^>]*>)*\}(<[^>]*>)*\s/ @name = {<>}
/\s(<[^>]*>)*\^(<[^>]*>)*\s(<[^>]*>\s)*(<[^>]*>)*\$(<[^>]*>)*\s/ @name = ^<>$
/\s(<[^>]*>)*\*(<[^>]*>)*\s(<[^>]*>\s)*(<[^>]*>)*\+(<[^>]*>)*\s/ @name = *<>+
/\s(<[^>]*>)*\?(<[^>]*>)*\s(<[^>]*>\s)*(<[^>]*>)*\.(<[^>]*>)*\s/ @name = ?<>.