[Perl] problemi con l'if

[NavZone]

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.