Dunno if this meets your needs, but have a look at how tobyink's Sub::Infix does it.
Edit: missing words.
In reply to Re: Implementing named infix operators with parser hook?
by haukex
in thread Implementing named infix operators with parser hook?
by LanX
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |