Pernyataan Perl goto

Penulis：Eve Cole Waktu Pembaruan：2025-01-03 10:48:01

Perl mempunyai tiga bentuk goto: got LABLE, goto EXPR, dan goto &NAME:

nomor seri	tipe goto
1	pergi ke LABEL Temukan pernyataan bertanda LABEL dan jalankan kembali dari sana.
2	pergi ke EXPR Formulir goto EXPR hanyalah bentuk umum dari goto LABEL. Ia mengharapkan ekspresi menghasilkan nama tag dan melompat ke tag tersebut untuk dieksekusi.
3	pergi & NAMA Ini menggantikan proses anak yang berjalan dengan panggilan ke proses anak bernama.

tata bahasa

Format sintaksnya adalah sebagai berikut:

 buka LABEL atau buka EXPR atau buka &NAMA

flow chart

Contoh

Dua contoh berikut muncul dari output ketika variabel $a adalah 15.

Berikut ini adalah contoh goto yang umum digunakan:

Contoh

#/usr/bin/Perl $ a = 10 ; { jika ( $a == 15 ) { # Lewati iterasi $a = $a + 1 ; # Gunakan formulir goto LABEL mencetak " Keluar dari keluaran n " ; lingkaran ; " Kalimat ini tidak akan dieksekusi n " ; mencetak " a = $ a n " ; $a = $a + 1 } sementara ( $a < 20 ) ;

Dengan mengeksekusi program di atas, hasil keluarannya adalah:

 a = 10a = 11a = 12a = 13a = 14 melompat keluar dari keluaran a = 16a = 17a = 18a = 19

Contoh berikut menggunakan formulir goto EXPR. Kami menggunakan dua string dan menghubungkannya menggunakan titik (.).

Contoh

$ a = 10 ; $ str1 = " LO " ; $ str2 = " OP " ; { jika ( $a == 15 ) { # Lewati iterasi $a = $a + 1 ; # Gunakan formulir goto EXPR pergi $str1 . $str2 ; # Mirip dengan goto LOOP } mencetak " a = $ a n " ; $a = $a + 1 } sementara ( $a < 20 ) ;

Dengan mengeksekusi program di atas, hasil keluarannya adalah:

 a = 10a = 11a = 12a = 13a = 14a = 16a = 17a = 18a = 19