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