Fonction Perl qw
La description
Cette fonction est un moyen rapide de spécifier un grand nombre de petits mots entre guillemets simples. Par exemple, qw (foo bar baz) équivaut à ('foo', 'bar', 'baz'). Certains programmeurs estiment que l'utilisation de qw facilite la lecture des scripts Perl. Vous pouvez en fait utiliser n'importe quel ensemble de délimiteurs, pas seulement les parenthèses.
Vous pouvez simplement utiliser qw () pour préparer un tableau comme indiqué dans l'exemple ci-dessous.
Syntaxe
Voici la syntaxe simple de cette fonction -
qw EXPR
Valeur de retour
Cette fonction renvoie une liste constituée de l'élément de LIST évalué comme s'il était entre guillemets simples.
Exemple
Voici l'exemple de code montrant son utilisation de base -
#!/usr/bin/perl -w
@array = qw(This is a list of words without interpolation);
foreach $key (@array) {
print"Key is $key\n";
}
Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -
Key is This
Key is is
Key is a
Key is list
Key is of
Key is words
Key is without
Key is interpolation