Perl - Loop

Mungkin ada situasi ketika Anda perlu mengeksekusi blok kode beberapa kali. Secara umum, pernyataan dieksekusi secara berurutan: Pernyataan pertama dalam suatu fungsi dijalankan pertama, diikuti oleh yang kedua, dan seterusnya.

Bahasa pemrograman menyediakan berbagai struktur kontrol yang memungkinkan jalur eksekusi yang lebih rumit.

Pernyataan loop memungkinkan kita untuk mengeksekusi pernyataan atau sekelompok pernyataan beberapa kali dan berikut adalah bentuk umum dari pernyataan loop di sebagian besar bahasa pemrograman -

Bahasa pemrograman Perl menyediakan tipe loop berikut untuk menangani persyaratan perulangan.

Sr.No. Jenis & Deskripsi Loop
1 while loop

Mengulangi pernyataan atau sekelompok pernyataan saat kondisi tertentu benar. Ini menguji kondisi sebelum menjalankan badan perulangan.

2 sampai loop

Mengulangi pernyataan atau sekelompok pernyataan sampai kondisi tertentu menjadi benar. Ini menguji kondisi sebelum menjalankan badan perulangan.

3 untuk loop

Menjalankan urutan pernyataan beberapa kali dan menyingkat kode yang mengelola variabel loop.

4 foreach loop

Perulangan foreach mengulangi nilai daftar normal dan menetapkan variabel VAR menjadi setiap elemen daftar secara bergantian.

5 lakukan ... while loop

Seperti pernyataan while, kecuali pernyataan itu menguji kondisi di akhir badan perulangan

6 loop bersarang

Anda dapat menggunakan satu atau lebih loop di dalam while lainnya, for atau do.. while loop.

Pernyataan Kontrol Loop

Pernyataan kontrol loop mengubah eksekusi dari urutan normalnya. Saat eksekusi meninggalkan lingkup, semua objek otomatis yang dibuat dalam lingkup itu akan dimusnahkan.

Perl mendukung pernyataan kontrol berikut. Klik tautan berikut untuk memeriksa detailnya.

Sr.No. Pernyataan & Deskripsi Kontrol
1 pernyataan selanjutnya

Menyebabkan loop melewati sisa tubuhnya dan segera menguji ulang kondisinya sebelum mengulang.

2 pernyataan terakhir

Menghentikan pernyataan loop dan mentransfer eksekusi ke pernyataan segera setelah loop.

3 lanjutkan pernyataan

BLOK terus, itu selalu dijalankan tepat sebelum kondisional akan dievaluasi lagi.

4 ulangi pernyataan

Perintah redo memulai ulang blok loop tanpa mengevaluasi kondisional lagi. Blok lanjutkan, jika ada, tidak dijalankan.

5 pernyataan goto

Perl mendukung perintah goto dengan tiga bentuk: goto label, goto expr, dan goto & name.

Loop Tak Terbatas

Pengulangan menjadi pengulangan tanpa batas jika suatu kondisi tidak pernah menjadi salah. Ituforloop secara tradisional digunakan untuk tujuan ini. Karena tidak satupun dari ketiga ekspresi itu membentukfor loop diperlukan, Anda dapat membuat loop tanpa akhir dengan mengosongkan ekspresi kondisional.

#!/usr/local/bin/perl
 
for( ; ; ) {
   printf "This loop will run forever.\n";
}

Anda dapat menghentikan loop tak terbatas di atas dengan menekan tombol Ctrl + C kunci.

Jika ekspresi kondisional tidak ada, maka dianggap benar. Anda mungkin memiliki inisialisasi dan ekspresi inkremen, tetapi sebagai programmer lebih umum menggunakan konstruksi for (;;) untuk menandakan loop tak terbatas.