.....и еще, и быстрей, и с удовольствием ;-)

я в рвэшках не силен, но это работает -

^context[qwerty;
^match[([a-z0-9-]+)@([a-z0-9-]+)\.(ru|com|net|uc|info|tv|porno|и тд. и тп.);i;^form[email]]
=^item[match]=
]