manipulation de la fun shift

if ($ARGV eq "-file") {
$temp_fname = shift @ARGV;
}
elsif ($ARGV eq "-path") {
$SEARCH=shift @ARGV;
}

elsif ($ARGV eq "-group") {
$STA_GROUP = shift @ARGV;
}
c est koi le fonctionnement du petit prog je precise ma quetion est ce que le shift jou son role de suprime l'element a gauche du @ARGV si la condition est vrai

La fonction shift renvoie le premier élément du tableau et le dépile du tableau.

Exemple:

my @tableau = ("toto", "titi", "tutu");
my $element = shift @tableau;

$element vaut maintenant "toto" et @tableau vaut maintenant ("titi", "tutu").