Uso di Forech Loop a Perl
Sintassi
Diverse sintassi di per ciascuno Il ciclo è riportato di seguito.
UN. foreach var (array)
dichiarazione (s);
Il ciclo di forea sopra viene utilizzato per iterare i valori dell'array.
B. foreach var (file_handler)
dichiarazione (s);
Il ciclo foreach sopra viene utilizzato per leggere il contenuto di un file.
C. foreach var ()
dichiarazione (s);
Il ciclo foreach sopra viene utilizzato per leggere gli input dell'utente.
Diversi usi del ciclo foreach sono stati mostrati nella prossima parte di questo tutorial.
Esempio-1: leggi un array monodimensionale
Crea un file Perl con il seguente codice che iterirà i valori di un array unidimensionale usando un per ciascuno Loop e stampare ogni valore dell'array in una linea. Un array di 5 valori di stringa è stato definito nel codice. In ogni iterazione del ciclo, ogni valore dell'array verrà analizzato e stampato nell'output con la nuova linea.
# Dichiara una matrice di valori di stringa
@Students = ("Mir Sabbir", "Meena Chowdhury", "Lisa Rahman", "Nirob Hossain", "Keya Khan");
# Itera i valori dell'array usando il ciclo forea
foreach $ value (@students)
# Stampa il valore dell'array
stampare "$ value \ n";
Produzione
Verrà visualizzato il seguente output dopo aver eseguito il codice sopra.
Esempio-2: leggi un array bidimensionale
Crea un file Perl con il seguente codice che iterirà i valori di un array bidimensionale utilizzando un per ciascuno Loop e stampare ogni valore dell'array in una linea. Nel codice è stato definito un array bidimensionale di 4 righe e 3 colonne. È stata aggiunta una linea extra dopo aver iterato tutti i valori di una riga. I valori di ciascuna riga sono stati analizzati usando la variabile oggetto definita nel loop.
# Dichiara un array bidimensionale
@Students = (
id => '20227856',
name => 'neha ali',
segni => 89
,
id => '20224523',
name => 'mizanur rahman',
segni => 95
,
id => '20221278',
nome => 'ruhul amin',
segni => 69
,
id => '20228956',
name => 'mehrab hossain',
segni => 70
,
);
# Itera i valori dell'array
Foreach $ std (@students)
# Stampa i valori dell'array
Stampa "ID Student:", $ std-> 'id', "\ n";
Stampa "Nome studente:", $ std-> 'name', "\ n";
Stampa "Marks Student:", $ std-> 'marks', "\ n \ n";
Produzione
Verrà visualizzato il seguente output dopo aver eseguito il codice sopra.
Esempio-3: leggi l'intervallo di valori
Crea un file Perl con il seguente codice che iterirà il per ciascuno Loop in base ai valori di un array di intervallo. In ogni iterazione, un valore numerico verrà preso dall'utente e inserito in un array. I valori di questo array verranno stampati dopo aver completato l'iterazione del loop.
# Dichiara un array
@linee;
# Itera il ciclo 4 volte
Forech $ numeri (1 ... 4)
# Stampa Messaggio per l'utente
stampare "Immettere un numero:";
# Prendi input dall'utente
$ riga =;
# Aggiungi il valore di input nell'array
Push @lines, $ line;
# Stampa i valori dell'array
Stampa "\ Narray Values sono: \ n", @lines;
Produzione
Verrà visualizzato il seguente output dopo aver eseguito il codice sopra.
Esempio-4: leggi il contenuto di un file
Crea un testo chiamato il mio file.TXT con il seguente contenuto prima di testare il codice di questo esempio.
il mio file.TXT
Perl è un linguaggio di programmazione per uso generale.
È simile nella sintassi alla lingua C.
È una lingua aperta e interpretata.
Crea un file Perl con il seguente codice che leggerà il contenuto di il mio file.file txt e stampare il contenuto del file utilizzando a per ciascuno ciclo continuo. IL aprire() La funzione è stata utilizzata nel codice per aprire il file per la lettura. IL "<” symbol is used to open a file for reading in PERL. Next, the per ciascuno Loop è stato utilizzato per leggere e stampare la riga di contenuto del file per riga.
# Imposta il nome file
$ fileName = 'myfile.TXT';
# Apri il file per la lettura
Apri $ file_handler, "<', $filename or die "Unable to open $filename file.";
# Leggi ogni riga del file utilizzando Foreach Loop
foreach $ line ()
# Stampa la riga del file
Stampa $ riga;
Produzione
Verrà visualizzato il seguente output dopo aver eseguito il codice sopra se il il mio file.TXT Il file non esiste nella posizione corrente.
Dopo aver creato il il mio file.TXT file, verrà visualizzato il seguente output dopo aver eseguito lo script sopra.
Esempio-5: Controlla il ciclo foreach usando la parola chiave "ultima"
Creare un file Perl con il seguente codice in cui il per ciascuno Loop verrà terminato utilizzando il scorso Parole chiave in base a "Se" condizione. IL per ciascuno Loop iterirà 10 volte in base all'array di portata. Il ciclo verrà terminato dopo aver iterato il ciclo 4 volte.
# Definisci il ciclo per iterare 10 volte
Forech $ numera (1… 10)
# Stampa il valore corrente
Stampa "Il numero corrente è $ numero.\N";
#Termina il ciclo in base alla condizione "if"
ultimo se $ numero> 3;
# Stampa il messaggio di terminazione
Stampa "Il ciclo è terminato.\N";
Produzione
Verrà visualizzato il seguente output dopo aver eseguito il codice sopra.
Esempio-6: leggi i valori di più array
Crea un file Perl con il seguente codice che stamperà i valori di due array numerici utilizzando un singolo per ciascuno ciclo continuo. I valori di due array e i valori uniti di questi array verranno stampati dopo aver eseguito il codice.
# Definisci il primo array
@Array1 = (20, 30, 65);
# Definisci il secondo array
@Array2 = (45, 18, 60, 11);
Stampa "I primi valori di array sono: \ n", join (",@array1)," \ n ";
Stampa "I valori del secondo array sono: \ n", join (",@array2)," \ n ";
Stampa "I valori di entrambi i matrici sono: \ n";
# Leggi i valori di entrambi i array usando loop
Foreach $ Number ( @Array1, @Array2)
# Stampa il valore dell'array
stampare "$ numero";
stampare "\ n";
Produzione
Verrà visualizzato il seguente output dopo aver eseguito il codice sopra
Conclusione
I modi di usare il foreach Loop per analizzare array unidimensionale, array bidimensionali, più array e contenuto del file sono stati mostrati in questo tutorial per aiutare l'utente perl a conoscere gli usi del per ciascuno Loop in Perl correttamente.