PDA

Visualizza la versione completa : [Perl] problemi con l'if


NavZone
10-08-2003, 20:13
io ho realizzato questo mini programma



#!/usr/bin/perl
@user = ('Navigator','lethalman');
$user = @user;
print "Inserisci il tuo nick: ";
$nick = <STDIN>;
if ($nick = $user) {
print "Ciao $user sei ritornato\n";
}
else {
print "Ciao $nick benvenuto nella crew\n";
}


Ma non mi riconosce le variabili in @user, qualsiasi cosa scrivo mi restituisce

print "Ciao $user sei ritornato\n";

Ma invece di scrivere il nick mi scrive

Ciao 2 sei ritornato

Ma dove lo prende questo 2??? :master:


Grazie per il vostro aiuto.

Michele Facchin
11-08-2003, 09:42
E' il numero di elementi del array.

Usa un Foreach per fare quel tipo di controllo.

Loading