Funzione Perl qw

Descrizione

Questa funzione è un modo rapido per specificare molte piccole parole con virgolette singole. Ad esempio, qw (foo bar baz) è equivalente a ('foo', 'bar', 'baz'). Alcuni programmatori ritengono che l'uso di qw renda gli script Perl più facili da leggere. Puoi effettivamente utilizzare qualsiasi set di delimitatori, non solo le parentesi.

Semplicemente puoi usare qw () per preparare un array come mostrato nell'esempio sotto.

Sintassi

Di seguito è riportata la semplice sintassi per questa funzione:

qw EXPR

Valore di ritorno

Questa funzione restituisce una lista composta dall'elemento di LISTA valutato come se fosse un apice.

Esempio

Di seguito è riportato il codice di esempio che mostra il suo utilizzo di base:

#!/usr/bin/perl -w

@array = qw(This is a list of words without interpolation);

foreach $key (@array) {
   print"Key is $key\n";
}

Quando viene eseguito il codice sopra, produce il seguente risultato:

Key is This
Key is is
Key is a
Key is list
Key is of
Key is words
Key is without
Key is interpolation