Fonction map explication

Bonjour quelqun pouurait mexpliquer ce que signifie cette ligne de code en pensant que le tableau qtreeshell contient des valeurs texte.

my %wmm = map ({$_=>1} @qtreeshell);

my @del2sql = grep ({ not $wmm{$_} } @qtreesql);


Merci d'avance pour votre aide

Ici, la fonction map crée le hash %wmm, avec pour clés, les éléments du tableau @qtreeshell et pour valeurs le chiffre 1 (évaluées à vrai dans la ligne suivante).

Ensuite le grep retourne dans @del2sql les éléments de @qtreesql qui ne figurent pas dans le hash %wmm (et qui, donc, ne figuraient pas dans le tableau @qtreeshell d'origine).

Merci a toi !