m0b: Logischer Operator und in Perl

Beitrag lesen

Ich habe folgende Zeile in meinen Script eingebaut:

unless ($email =~ /./ && $email =~ /@/)
{$bool002 = 1}

Wenn $email nur einen Punkt enthält, wird $bool002 nicht eins gesetzt.
Wenn $email weder Punkt noch @ besitzt, wird $bool002 auch nich gleich eins gesetzt.

Sobald $email aber ein @ enthält, wird $bool002 gleich 1 gesetzt.
Da Punkt und @ in der Bedingung aber mit einem logischen UND verbunden
sind, dürfte $bool002 nur gleich 1 gesetzt werden, wenn $email Punkt und
@ enthält.

Was ist falsch????
PS: Ein Backslash "" vor das @ bringt nichts.....

Wäre cool wenn jemand etwas wüsste....