Perl - Operator
Apa itu Operator?
Jawaban sederhana dapat diberikan menggunakan ekspresi 4 + 5 sama dengan 9 . Di sini 4 dan 5 disebut operan dan + disebut operator. Bahasa Perl mendukung banyak jenis operator, tetapi berikut ini adalah daftar operator penting dan paling sering digunakan -
- Operator Aritmatika
- Operator Kesetaraan
- Operator Logis
- Operator Penugasan
- Operator Bitwise
- Operator Logis
- Operator Kutipan
- Operator Miscellaneous
Mari kita lihat semua operator satu per satu.
Operator Aritmatika Perl
Asumsikan variabel $ a menampung 10 dan variabel $ b menampung 20, maka berikut ini adalah operator aritmatik Perl -
Tunjukkan Contoh
Sr.No. | Operator & Deskripsi |
---|---|
1 | + ( Addition ) Menambahkan nilai di kedua sisi operator Example - $ a + $ b akan memberi 30 |
2 | - (Subtraction) Mengurangi operan tangan kanan dari operan tangan kiri Example - $ a - $ b akan memberikan -10 |
3 | * (Multiplication) Mengalikan nilai di kedua sisi operator Example - $ a * $ b akan memberi 200 |
4 | / (Division) Membagi operan tangan kiri dengan operan tangan kanan Example - $ b / $ a akan memberi 2 |
5 | % (Modulus) Membagi operan tangan kiri dengan operan tangan kanan dan mengembalikan sisanya Example - $ b% $ a akan memberi 0 |
6 | ** (Exponent) Melakukan kalkulasi eksponensial (daya) pada operator Example - $ a ** $ b akan memberikan 10 pangkat 20 |
Operator Kesetaraan Perl
Ini juga disebut operator relasional. Asumsikan variabel $ a menampung 10 dan variabel $ b menampung 20, maka mari kita periksa operator persamaan numerik berikut -
Tunjukkan Contoh
Sr.No. | Operator & Deskripsi |
---|---|
1 | == (equal to) Memeriksa apakah nilai dua operan sama atau tidak, jika ya maka kondisinya menjadi benar. Example - ($ a == $ b) tidak benar. |
2 | != (not equal to) Memeriksa apakah nilai dari dua operan sama atau tidak, jika nilai tidak sama maka kondisi menjadi benar. Example - ($ a! = $ B) benar. |
3 | <=> Memeriksa apakah nilai dari dua operan sama atau tidak, dan mengembalikan -1, 0, atau 1 bergantung pada apakah argumen kiri secara numerik kurang dari, sama dengan, atau lebih besar dari argumen kanan. Example - ($ a <=> $ b) mengembalikan -1. |
4 | > (greater than) Memeriksa apakah nilai operan kiri lebih besar dari nilai operan kanan, jika ya maka kondisi menjadi benar. Example - ($ a> $ b) tidak benar. |
5 | < (less than) Memeriksa apakah nilai operan kiri kurang dari nilai operan kanan, jika ya maka kondisinya menjadi benar. Example - ($ a <$ b) benar. |
6 | >= (greater than or equal to) Memeriksa apakah nilai operan kiri lebih besar dari atau sama dengan nilai operan kanan, jika ya maka kondisi menjadi benar. Example - ($ a> = $ b) tidak benar. |
7 | <= (less than or equal to) Memeriksa apakah nilai operan kiri kurang dari atau sama dengan nilai operan kanan, jika ya maka kondisi menjadi benar. Example - ($ a <= $ b) benar. |
Di bawah ini adalah daftar operator ekuitas. Asumsikan variabel $ a menampung "abc" dan variabel $ b menampung "xyz" lalu, mari kita periksa operator persamaan string berikut -
Tunjukkan Contoh
Sr.No. | Operator & Deskripsi |
---|---|
1 | lt Mengembalikan nilai benar jika argumen kiri stringwise kurang dari argumen kanan. Example - ($ a lt $ b) benar. |
2 | gt Mengembalikan nilai benar jika argumen kiri stringwise lebih besar dari argumen kanan. Example - ($ a gt $ b) salah. |
3 | le Mengembalikan nilai benar jika argumen kiri stringwise kurang dari atau sama dengan argumen kanan. Example - ($ a le $ b) benar. |
4 | ge Mengembalikan nilai benar jika argumen kiri stringwise lebih besar dari atau sama dengan argumen kanan. Example - ($ a ge $ b) salah. |
5 | eq Mengembalikan nilai benar jika argumen kiri stringwise sama dengan argumen kanan. Example - ($ a eq $ b) salah. |
6 | ne Mengembalikan nilai benar jika argumen kiri stringwise tidak sama dengan argumen kanan. Example - ($ a ne $ b) benar. |
7 | cmp Mengembalikan -1, 0, atau 1 bergantung pada apakah argumen kiri stringwise kurang dari, sama dengan, atau lebih besar dari argumen kanan. Example - ($ a cmp $ b) adalah -1. |
Operator Penugasan Perl
Asumsikan variabel $ a menampung 10 dan variabel $ b menampung 20, maka di bawah ini adalah operator penugasan yang tersedia di Perl dan penggunaannya -
Tunjukkan Contoh
Sr.No. | Operator & Deskripsi |
---|---|
1 | = Operator penugasan sederhana, Menetapkan nilai dari operan sisi kanan ke operan sisi kiri Example - $ c = $ a + $ b akan memberikan nilai $ a + $ b ke $ c |
2 | += Tambahkan AND operator penugasan, Ini menambahkan operan kanan ke operan kiri dan menetapkan hasilnya ke operan kiri Example - $ c + = $ a setara dengan $ c = $ c + $ a |
3 | -= Kurangi AND operator penugasan, Ini mengurangi operan kanan dari operan kiri dan menetapkan hasilnya ke operan kiri Example - $ c - = $ a setara dengan $ c = $ c - $ a |
4 | *= Kalikan DAN operator penugasan, Ini mengalikan operan kanan dengan operan kiri dan menetapkan hasilnya ke operan kiri Example - $ c * = $ a setara dengan $ c = $ c * $ a |
5 | /= Bagi AND operator penugasan, Ini membagi operan kiri dengan operan kanan dan menetapkan hasilnya ke operan kiri Example - $ c / = $ a setara dengan $ c = $ c / $ a |
6 | %= Modulus AND operator penugasan, Dibutuhkan modulus menggunakan dua operan dan menetapkan hasilnya ke operan kiri Example - $ c% = $ a setara dengan $ c = $ c% a |
7 | **= Operator eksponen DAN penugasan, Melakukan kalkulasi eksponensial (daya) pada operator dan menetapkan nilai ke operan kiri Example - $ c ** = $ a setara dengan $ c = $ c ** $ a |
Operator Perl Bitwise
Operator bitwise bekerja pada bit dan melakukan operasi bit demi bit. Asumsikan jika $ a = 60; dan $ b = 13; Sekarang dalam format biner akan menjadi sebagai berikut -
$ a = 0011 1100
$ b = 0000 1101
-----------------
$ a & $ b = 0000 1100
$ a | $ b = 0011 1101
$ a ^ $ b = 0011 0001
~ $ a = 1100 0011
Ada operator Bitwise berikut yang didukung oleh bahasa Perl, asumsikan jika $ a = 60; dan $ b = 13
Tunjukkan Contoh
Sr.No. | Operator & Deskripsi |
---|---|
1 | & Biner AND Operator menyalin sedikit ke hasil jika ada di kedua operan. Example - ($ a & $ b) akan menghasilkan 12 yaitu 0000 1100 |
2 | | Biner OR Operator menyalin sedikit jika ada di operan eather. Example - ($ a | $ b) akan menghasilkan 61 yaitu 0011 1101 |
3 | ^ Operator Biner XOR menyalin bit jika diatur dalam satu operan tetapi tidak keduanya. Example - ($ a ^ $ b) akan menghasilkan 49 yaitu 0011 0001 |
4 | ~ Operator Pelengkap Binary Ones adalah unary dan memiliki efek bit 'membalik'. Example - (~ $ a) akan memberikan -61 yaitu 1100 0011 dalam bentuk komplemen 2 karena bilangan biner bertanda. |
5 | << Operator Binary Left Shift. Nilai operan kiri dipindahkan ke kiri dengan jumlah bit yang ditentukan oleh operan kanan. Example - $ a << 2 akan menghasilkan 240 yaitu 1111 0000 |
6 | >> Operator Pergeseran Kanan Biner. Nilai operan kiri dipindahkan ke kanan dengan jumlah bit yang ditentukan oleh operan kanan. Example - $ a >> 2 akan menghasilkan 15 yaitu 0000 1111 |
Operator Logical Perl
Ada operator logika berikut yang didukung oleh bahasa Perl. Asumsikan variabel $ a bernilai true dan variabel $ b bernilai false maka -
Tunjukkan Contoh
Sr.No. | Operator & Deskripsi |
---|---|
1 | and Disebut Logical AND operator. Jika kedua operan benar maka kondisi menjadi benar. Example - ($ a dan $ b) salah. |
2 | && Operator C-style Logical AND menyalin sedikit ke hasil jika ada di kedua operan. Example - ($ a && $ b) salah. |
3 | or Disebut Logical OR Operator. Jika salah satu dari dua operan bukan nol maka kondisi menjadi benar. Example - ($ a atau $ b) benar. |
4 | || Operator C-style Logical OR menyalin sedikit jika ada di operan eather. Example - ($ a || $ b) benar. |
5 | not Disebut Logical NOT Operator. Gunakan untuk membalikkan keadaan logis operannya. Jika kondisi benar maka operator NOT akan membuat salah. Example - tidak ($ a dan $ b) benar. |
Operator Kutipan
Ada operator seperti Kutipan berikut yang didukung oleh bahasa Perl. Dalam tabel berikut, {} mewakili pasangan pembatas yang Anda pilih.
Tunjukkan Contoh
Sr.No. | Operator & Deskripsi |
---|---|
1 | q{ } Mengapit string dengan tanda kutip tunggal Example - q {abcd} menjadi 'abcd' |
2 | qq{ } Mengapit string dengan tanda kutip ganda Example - qq {abcd} menghasilkan "abcd" |
3 | qx{ } Mengapit string dengan tanda kutip terbalik Example - qx {abcd} menghasilkan `abcd` |
Operator Miscellaneous
Ada operator miscellaneous berikut yang didukung oleh bahasa Perl. Asumsikan variabel a menampung 10 dan variabel b menampung 20 maka -
Tunjukkan Contoh
Sr.No. | Operator & Deskripsi |
---|---|
1 | . Operator biner dot (.) Menggabungkan dua string. Example - Jika $ a = "abc", $ b = "def" maka $ a. $ B akan menghasilkan "abcdef" |
2 | x Operator pengulangan x mengembalikan string yang terdiri dari operan kiri diulang beberapa kali yang ditentukan oleh operan kanan. Example - ('-' x 3) akan memberikan ---. |
3 | .. Operator rentang .. mengembalikan daftar nilai yang dihitung (naik per satu) dari nilai kiri ke nilai kanan Example - (2..5) akan memberikan (2, 3, 4, 5) |
4 | ++ Operator Auto Increment meningkatkan nilai integer satu Example - $ a ++ akan memberikan 11 |
5 | -- Operator Auto Decrement menurunkan nilai integer satu kali Example - $ a-- akan memberikan 9 |
6 | -> Operator panah banyak digunakan dalam mendereferensi metode atau variabel dari suatu objek atau nama kelas Example - $ obj -> $ a adalah contoh untuk mengakses variabel $ a dari objek $ obj. |
Diutamakan Operator Perl
Tabel berikut mencantumkan semua operator dari prioritas tertinggi hingga terendah.
Tunjukkan Contoh
left terms and list operators (leftward)
left ->
nonassoc ++ --
right **
right ! ~ \ and unary + and -
left =~ !~
left * / % x
left + - .
left << >>
nonassoc named unary operators
nonassoc < > <= >= lt gt le ge
nonassoc == != <=> eq ne cmp ~~
left &
left | ^
left &&
left || //
nonassoc .. ...
right ?:
right = += -= *= etc.
left , =>
nonassoc list operators (rightward)
right not
left and
left or xor