skalar Perl

Skalar adalah satuan data sederhana.

Skalar dapat berupa bilangan bulat, bilangan floating point, karakter, string, paragraf, atau halaman web lengkap.

Contoh berikut menunjukkan penggunaan skalar secara sederhana:

Contoh

#!/usr/bin/Perl $age = 20 ; # Penugasan bilangan bulat $nama = " Kodercto " ; # string $gaji = 130,50 ; # Angka floating point mencetak " Umur = $ umur n " ; " Nama = $ nama n " ; " Gaji = $gaji n " ;

Dengan mengeksekusi program di atas, hasil keluarannya adalah:

 Umur = 20Nama = CoderctoGaji = 130,5

skalar numerik

Skalar biasanya berupa angka atau string. Contoh berikut menunjukkan penggunaan berbagai jenis skalar numerik:

Contoh

#!/usr/bin/Perl $integer = 200 ; $negatif = - 300 ; $mengambang = 200.340 ; $bigfloat = - 1.2 E - 23 ; $oktal = 0377 ; # Heksadesimal FF, desimalnya 255 $ hexa = 0 xff ; " bilangan bulat = $bilangan bulat n " ; " negatif = $ negatif n " ; " mengambang = $mengambang n " ; " bigfloat = $bigfloat n " ; " oktal = $oktal n " ; " heksa = $heksa n " ;

Dengan mengeksekusi program di atas, hasil keluarannya adalah:

 integer = 200negatif = -300floating = 200.34bigfloat = -1.2e-23octal = 255hexa = 255

skalar string

Contoh berikut menunjukkan penggunaan berbagai jenis skalar string. Perhatikan perbedaan antara tanda kutip tunggal dan tanda kutip ganda:

Contoh

#!/usr/bin/Perl $var = " String skalar - tutorial pembuat kode! " ; $quote = ' Saya menggunakan tanda kutip tunggal - $var ' ; $ double = " Saya menggunakan tanda kutip ganda - $var " ; t Halo Dunia! " ; cetak " var = $var n " ; " kutipan = $kutipan n " ; " ganda = $ ganda n " ; " melarikan diri = $melarikan diri n " ;

Dengan mengeksekusi program di atas, hasil keluarannya adalah:

 var = Skalar string - Tutorial Pemrogram! quote = Saya dalam tanda kutip tunggal - $vardouble = Saya dalam tanda kutip ganda - Skalar string - Tutorial Pemrogram! escape = Gunakan karakter escape - Halo Dunia!

Operasi skalar

Contoh berikut menunjukkan operasi sederhana pada skalar:

Contoh

#!/usr/bin/Perl $str = " halo " . " dunia " ; # Penggabungan string $angka = 5 + 10 ; # Tambahkan dua angka $mul = 4 * 5 ; # Kalikan dua angka $mix = $str . $num ; # Menggabungkan string dan angka mencetak " str = $ str n " ; " angka = $ angka n " ; " campuran = $campuran n " ;

Dengan mengeksekusi program di atas, hasil keluarannya adalah:

 str = helloworldnum = 15mix = helloworld15

string multibaris

Kita dapat menggunakan tanda kutip tunggal untuk menghasilkan string multi-baris sebagai berikut:

Contoh

#!/usr/bin/Perl $string = ' Tutorial Pembuat Kode - Pelajari tidak hanya teknologi, tetapi juga impian! ' ;​ " $string n " ;

Dengan mengeksekusi program di atas, hasil keluarannya adalah:

 Tutorial untuk pembuat kode - pelajari tidak hanya teknologi, tetapi juga impian!

Anda juga dapat menggunakan sintaks dokumen "di sini" untuk menghasilkan beberapa baris:

Contoh

#!/usr/bin/Perl print << EOF ;Tutorial untuk pembuat kode--pelajari tidak hanya teknologi, tetapi juga impian! EOF

Dengan mengeksekusi program di atas, hasil keluarannya adalah:

 Tutorial untuk pembuat kode - pelajari tidak hanya teknologi, tetapi juga impian!

karakter khusus

Di bawah ini kami akan mendemonstrasikan penerapan karakter khusus di Perl, seperti __FILE__, __LINE__, dan __PACKAGE__, yang masing-masing mewakili nama file, nomor baris, dan nama paket skrip yang sedang dijalankan.

Catatan : __ adalah dua garis bawah, dan ada dua garis bawah sebelum dan sesudah __FILE__ .

Karakter khusus ini merupakan token terpisah dan tidak dapat ditulis dalam string, misalnya:

Contoh

#!/usr/bin/Perl mencetak " Nama berkas " __FILE__​​​​​​" nomor baris " __LINE__​​​​​​" Nama paket " __PACKAGE__​​​​​​mencetak " __FILE__ __LINE__ __PAKET__ n " ;

Dengan mengeksekusi program di atas, hasil keluarannya adalah:

 Nama file test.pl nomor baris 4 nama paket main__FILE__ __LINE__ __PACKAGE__

v tali

Sebuah string yang dimulai dengan v diikuti oleh satu atau lebih bilangan bulat yang dipisahkan oleh titik diperlakukan sebagai string literal.

Saat Anda ingin mendeklarasikan nilai numerik untuk setiap karakter secara langsung, v-string menyediakan cara yang lebih bersih untuk membuat string tersebut, tidak seperti "x{1}x{14}x{ 12c}x{fa0}" yang tidak mudah untuk dipahami. Kita dapat melihat contoh berikut:

Contoh

#!/usr/bin/Perl $senyum = v9786 ; $foo = v102 .111 .111 ; $ martin = v77 .97 .114 .116 .105 .110 ; " senyum = $ senyum n " ; " foo = $foo n " ; " martin = $martin n " ;

Dengan mengeksekusi program di atas, hasil keluarannya adalah:

 Karakter lebar dicetak di test.pl baris 7.smile = ☺foo = foomartin = Martin