Operator ternary ?: di Perl

Dalam bahasa pemrograman Perl, ada satu operator yang bekerja dengan tiga operan. Operator ternary adalah 2 karakter ?:, dan simbol-simbol ini tercatat tidak dekat, dan antara operan.

Operator ternary kembali kedua dan ketiga operan tergantung pada nilai dari operan pertama. Jika operan pertama adalah benar, kemudian kembali kedua operan jika operan pertama adalah palsu, maka kembali operan ketiga (baca lebih lanjut tentang benar dan salah dalam Perl).

Berikut ini sebuah contoh:

▶ Run
#!/usr/bin/perl

my $var = 1 ? 100 : 200;

print $var;

Program ini akan menampilkan jumlah 100.

  • Ini pertama ditulis untuk operan pertama, dalam contoh ini, jumlah 1
  • Kemudian ada simbol ?
  • Kemudian mencatat operan kedua 100
  • Kemudian ada simbol :
  • Kemudian dicatat ketiga operan 200

Pertama operan 1 adalah benar sehingga hasil dari operator adalah operan kedua, yaitu jumlah 100. Nilai ini ditugaskan untuk variabel dan ditampilkan pada layar.

Bukan operator ternary dapat digunakan if-else. Berikut ini adalah sebuah program yang bekerja dengan baik sama seperti sebelumnya:

▶ Run
#!/usr/bin/perl

my $var;

if (1) {
    $var = 100;
} else {
    $var = 200;
}

print $var;

Kadang-kadang hal ini lebih nyaman untuk menggunakan operator ternary, dan kadang-kadang desain if-else.

Artikel lainnya