[FLUG] Re: [CODE] wordless.pl 0.2
- From: "Simon" <seddie@xxxxxxxxx>
- To: <fanolug@xxxxxxxxxxxxx>
- Date: Mon, 30 Jun 2003 21:11:59 +0200
Mailing List del Fortunae LUG
=============================
> > elsif($scelta !="1" || $scelta !="2" || $scelta !="3" || $scelta !="q")
>
> dov'è finito mr perl che usa le regexp
>
> elsif($scelta !=~ /1|2|3|q/)
> o meglio ^1$ ^2$
Faccio notare che il 3 non esiste come scelta.
In più non c'è bisogno di fare nessun controllo... se non si è entrati
in un elseif più in alto si è già certi che non è 1, 2 o q.
Quindi tipo:
if($scelta eq "1") { &inserisciparole; }
elsif($scelta eq "2") { &cercaparola; }
elsif($scelta eq "q") { exit(); }
else { print "non valido\n"; }
Ma poi tipo esiste switch:
use Switch;
switch($scelta)
{
case "1" { &inserisciparole; }
case "2" { &cercaparola; }
case "q" { exit(); }
else { print "non valido\n"; }
}
Io non conosco il perl quindi magari ho sparato qualche cagata,
sorry.
Simon.
--
"mhhh ciambelle, esiste qualcosa che non riescono a fare?"
Other related posts:
