validering af emailadr

["Christian Wix" <sslug@sslug>]

Jeg prøver at validere en email-adr. med flg. linie:
if ($email[$i] =~ /^[A-z0-9_\-]+\@(A-z0-9_-]+\.)+[A-z]{2,4}$/) {
bla bla bla
}
men den retunerer altid false. Hvad er der galt?
(@email er et array som indeholder emailadresser)

--
Med venlig hilsen,
Christian Wix