[PERL] Chiocciola ed espressioni regolari.

[salvo8788]

Ciao a tutti, da poco mi sono avvicinato al perl e ho il seguente listato:

$aa = "pippo@pippo.it";

if ($aa =~ /[a-z]+\@[a-z]+\.[a-z]{2}$/){
	print "ok";
}else{
	print "no";
}

puntualmente mi stampa "no" ! mentre se al posto della @ metto, per esempio, il # (sia in $aa che nella regexp) allora stampa "ok" .

Quacuno mi può dare una mano?

PS. L'interpetre è ActivePerl 5.10

[MARTEDI]

se metti:

$aa = "pippo@pippo.it";

la parte @pippo viene considerata una stringa
devi mettere:

$aa = "pippo\@pippo.it";

così l'interprete non identifica @pippo come un array

[MARTEDI]

oppure

$aa = 'pippo@pippo.it';

con ( ' ) al posto di ( " )

[salvo8788]

ok! grazie della soluzione!