Latest web development tutorials

Pernyataan switch perl

pernyataan bersyarat Perl pernyataan bersyarat Perl

Uji kasus pernyataanswitch memungkinkan variabel sama dengan beberapa nilai.Setiap nilai disebut kasus, dan variabel akan diuji setiapkasus saklar untuk diperiksa.

Beralih kasus saklar Executive didasarkan pada modul, Beralihmodul menggunakanFilter :: Util :: CalldanText :: Seimbanguntuk melakukan, kedua modul perlu diinstal.

tatabahasa

Sintaksnya adalah sebagai berikut: 

use Switch;

switch(argument){
   case 1            { print "数字 1" }
   case "a"          { print "字符串 a" }
   case [1..10,42]   { print "数字在列表中" }
   case (\@array)    { print "数字在数组中" }
   case /\w+/        { print "正则匹配模式" }
   case qr/\w+/      { print "正则匹配模式" }
   case (\%hash)     { print "哈希" }
   case (\&sub)      { print "子进程" }
   else              { print "不匹配之前的条件" }
}

Berikut ini adalah aturan pernyataan switch:

  • kurungberalih pernyataan dapat digunakan di semua jenis parameter skalar.

  • Dalam switch Anda dapat memiliki sejumlah laporan kasus. Setiap kasus diikuti dengan nilai untuk membandingkan dengan titik dua.

  • kasus pernyataan skalar, maka skalar akan beralih pernyataan, dan menentukan apakah atau tidak sama.

  • Ketika variabel yang diuji adalah sama dengan kasus konstanta waktu, diikuti dengan pernyataan kasus akan dieksekusi, sampai bertemu pernyataanbreak.

  • Pernyataanswitch dapat memiliki opsional lain,pernyataan di permukaan akhir, pernyataan dieksekusi dalam kasus tidak cocok hal apapun.

  • Ketika kasus pencocokan, blok pernyataan kasus mengeksekusi kode dari pernyataan switch setelah mengeksekusi.

  • Ketika kasus pencocokan, jika kita perlu terus mengeksekusi pernyataan kasus berikutnya, Anda perlu menambahkan pernyataanberikutnya.

diagram alir

contoh 

#!/usr/bin/perl

use Switch;

$var = 10;
@array = (10, 20, 30);
%hash = ('key1' => 10, 'key2' => 20);

switch($var){
   case 10           { print "数字 10\n" }
   case "a"          { print "字符串 a" }
   case [1..10,42]   { print "数字在列表中" }
   case (\@array)    { print "数字在数组中" }
   case (\%hash)     { print "在哈希中" }
   else              { print "没有匹配的条件" }
}

Program di atas, output adalah: 

数字 10

Selanjutnya kita melihat penggunaan contohberikutnya:

#!/usr/bin/perl

use Switch;

$var = 10;
@array = (10, 20, 30);
%hash = ('key1' => 10, 'key2' => 20);

switch($var){
   case 10           { print "数字 10\n"; next; }  # 匹配后继续执行
   case "a"          { print "string a" }
   case [1..10,42]   { print "数字在列表中" }
   case (\@array)    { print "数字在数组中" }
   case (\%hash)     { print "在哈希中" }
   else              { print "没有匹配的条件" }
}

Program di atas, output adalah: 

数字 10
数字在列表中

pernyataan bersyarat Perl pernyataan bersyarat Perl