Beberapa variabel khusus didefinisikan dalam bahasa Perl, biasanya diawali dengan $, @, atau %, misalnya: $_.
Banyak variabel khusus yang memiliki nama bahasa Inggris yang panjang. Variabel sistem operasi $! dapat ditulis sebagai $OS_ERROR.
Jika Anda ingin menggunakan variabel khusus dengan nama bahasa Inggris, Anda perlu menambahkan use English di bagian atas program. Hal ini memungkinkan penggunaan variabel khusus deskriptif bahasa Inggris.
Variabel khusus yang paling umum digunakan adalah $_, yang berisi input default dan konten pencocokan pola. Contohnya adalah sebagai berikut:
Dengan mengeksekusi program di atas, hasil keluarannya adalah:
GoogleCoderctoTaobao
Dalam contoh berikut kami tidak menggunakan $_ untuk menampilkan konten:
Dengan mengeksekusi program di atas, hasil keluarannya adalah:
GoogleCoderctoTaobao
Dalam contoh, "Google" adalah keluaran pertama, kemudian "Codercto" adalah keluaran, dan terakhir "Taobao" adalah keluaran.
Dalam perulangan berulang, string dari perulangan saat ini akan ditempatkan di $_, dan kemudian dikeluarkan melalui pencetakan. Selain itu, print tidak menentukan variabel keluaran, dan $_ digunakan secara default.
Berikut adalah beberapa tempat di mana Perl akan menganggap $_ meskipun tidak ditentukan:
Berbagai fungsi unary, termasuk fungsi seperti ord() dan int() dan semua operasi pengujian file ("-f", "-d") kecuali "-t", yang beroperasi pada STDIN secara default.
Berbagai fungsi daftar seperti print() dan unlink().
Operasi pencocokan pola "m//", "s///" dan "tr///" tanpa operator "=~".
Variabel iterasi default untuk loop "foreach" ketika tidak ada variabel lain yang diberikan.
Variabel iterasi implisit untuk fungsi grep() dan map().
Ketika "sementara" hanya memiliki satu kondisi, dan kondisi tersebut menguji hasil operasi "", $_ adalah lokasi default untuk rekaman input. Hal ini tidak terjadi kecuali pada kondisi pengujian "sementara". (Mnemonik: Garis bawah dapat dihilangkan dalam operasi tertentu.)
Berdasarkan sifat penggunaan variabel khusus, variabel tersebut dapat dibagi menjadi beberapa kategori berikut:
Variabel khusus skalar global.
Variabel khusus array global.
Variabel khusus hash global.
Pegangan file khusus global.
Konstanta khusus global.
Variabel khusus ekspresi reguler.
File menangani variabel khusus.
Berikut ini daftar semua variabel khusus skalar, termasuk variabel dengan karakter khusus dan bentuk bahasa Inggris:
| $_ | Input default dan konten pencocokan pola. |
| $ARG | |
| $. | Nomor baris saat ini dari pegangan file yang terakhir dibaca |
| $NR | |
| $/ | Masukkan pemisah rekaman, yang defaultnya adalah karakter baris baru. Jika Anda menggunakan variabel undef, akhir file akan dibaca. |
| $RS | |
| $, | Pemisah bidang keluaran |
| $OFS | |
| $ | Pemisah rekaman keluaran |
| $ATAU | |
| $" | Variabel ini mirip dengan $, tetapi harus digunakan untuk menginterpolasi array dan mengiris nilai menjadi string dengan tanda kutip ganda (atau string interpolasi serupa). Defaultnya adalah satu spasi. |
| $DAFTAR_SEPARATOR | |
| $; | Pembatas digunakan saat mensimulasikan array multidimensi. Standarnya adalah " 34". |
| $SUBSCRIPT_SEPARATOR | |
| $^L | Umpan kertas dikirim ke saluran keluaran. Standarnya adalah "f". |
| $FORMAT_FORMFEED | |
| $: | Kumpulan karakter saat ini setelah string dapat dipecah untuk mengisi kolom lanjutan (dimulai dengan ^) dalam format default adalah "n"". |
| $FORMAT_LINE_BREAK_CHARACTERS | |
| $^SEBUAH | Variabel untuk menyimpan data yang diformat sebelum dicetak |
| $AKUMULATOR | |
| $# | Format keluaran nomor default saat mencetak nomor (tidak digunakan lagi). |
| $OFMT | |
| $? | Mengembalikan status perintah eksternal sebelumnya |
| $CHILD_ERROR | |
| $! | Nilai numerik dari variabel ini adalah nilai errno, dan nilai string adalah string kesalahan sistem yang sesuai. |
| $OS_ERROR atau $ERRNO | |
| $@ | Pesan error dari perintah eval. Jika kosong berarti perintah eval terakhir berhasil dijalankan. |
| $EVAL_ERROR | |
| $$ | Nomor proses yang menjalankan skrip Perl saat ini |
| $PROCESS_ID atau $PID | |
| $< | Nomor pengguna sebenarnya dari proses saat ini |
| $REAL_USER_ID atau $UID | |
| $> | ID pengguna efektif dari proses saat ini |
| $EFFECTIVE_USER_ID atau $EUID | |
| $( | Nomor pengguna grup sebenarnya dari proses saat ini |
| $REAL_GROUP_ID atau $GID | |
| $) | Nomor pengguna grup efektif dari proses saat ini |
| $EFFECTIVE_GROUP_ID atau $EGID | |
| $0 | Berisi nama file skrip yang sedang dieksekusi |
| $PROGRAM_NAME | |
| $[ | Subskrip dari elemen pertama array, defaultnya adalah 0. |
| $] | Nomor versi Perl |
| $PERL_VERSION | |
| $^D | nilai bendera debug |
| $DEBUGGING | |
| $^E | Pesan kesalahan diperluas sistem operasi di lingkungan non-UNIX |
| $EXTENDED_OS_ERROR | |
| $^F | Nilai deskriptor bundel file maksimum |
| $SYSTEM_FD_MAX | |
| $^H | Status pemeriksaan sintaks diaktifkan oleh kompiler |
| $^saya | Nilai editor kontrol bawaan |
| $INPLACE_EDIT | |
| $^M | Ukuran kumpulan memori cadangan |
| $^O | nama sistem operasi |
| $OSNAME | |
| $^P | Variabel internal yang menentukan nilai debug saat ini |
| $PERLDB | |
| $^T | Waktu dalam hitungan detik saat naskah mulai berjalan, dimulai dari awal abad baru. |
| $ WAKTU DASAR | |
| $^W | Nilai saklar peringatan saat ini |
| $PERINGATAN | |
| $^X | Nama kode biner Perl yang dapat dieksekusi |
| $EXECUTABLE_NAME | |
| $ARGV | Nama file saat ini ketika membaca dari pegangan file default |
| @ARGV | Daftar argumen baris perintah yang diteruskan ke skrip |
| @INC | Daftar direktori yang akan dicari saat mengimpor modul |
| @F | Masukan array dari baris perintah |
%INC | Tabel hash %INC berisi semua file yang disertakan dengan pernyataan do atau require. Kuncinya adalah nama file dan nilainya adalah jalur ke file tersebut. |
%ENV | Berisi variabel lingkungan saat ini |
%SIG | Daftar sinyal dan cara menanganinya |
ARGV | Pegangan file khusus untuk mengulangi semua nama file dalam variabel array @ARGV |
STDERR | Pegangan keluaran kesalahan standar |
STDIN | pegangan masukan standar |
STDOUT | pegangan stdout |
DATA | Pegangan file khusus mengacu pada apa pun di file setelah tanda __END__, termasuk konten skrip. Atau rujuk semuanya setelah tanda __DATA__ dalam file yang disertakan. Selama Anda membaca data dalam paket yang sama, __DATA__ ada. |
_ (garis bawah) | Pegangan file khusus digunakan untuk menyimpan informasi file dalam cache (fstat, stat, dan lstat). |
__AKHIR__ | Logika skrip berakhir, dan teks berikutnya diabaikan. |
__MENGAJUKAN__ | nama file saat ini |
__GARIS__ | Nomor baris saat ini |
__KEMASAN__ | Nama paket saat ini. Nama paket default adalah main. |
$n | Berisi substring ke-n dari pencocokan pola terakhir |
$& | String dari pencocokan pola sukses sebelumnya |
$PERTANDINGAN | |
$` | Konten sebelum substring terakhir berhasil cocok |
$PREMATAN | |
$' | Konten setelah substring sebelumnya berhasil dicocokkan |
$ PASCA PERTANDINGAN | |
$+ | Tanda kurung terakhir cocok dengan pola pencarian ekspresi reguler sebelumnya. Misalnya: /Versi: (.*)|Revisi: (.*)/ && ($rev = $+); |
$LAST_PAREN_MATCH |
$| | Jika disetel ke nol, setelah setiap panggilan ke fungsi tulis atau cetak, fungsi fflush secara otomatis dipanggil untuk menulis kembali konten tertulis ke file. |
$OUTPUT_AUTOFLUSH | |
$% | Nomor halaman keluaran saat ini |
$FORMAT_PAGE_NUMBER | |
$= | Panjang setiap halaman saat ini. Standarnya adalah 60. |
$FORMAT_LINES_PER_PAGE | |
$- | Jumlah baris yang tersisa pada halaman saat ini |
$FORMAT_LINES_LEFT | |
$~ | Nama format keluaran laporan saat ini. Nilai defaultnya adalah nama pegangan file. |
$FORMAT_NAME | |
$^ | Nama format header keluaran laporan saat ini. Nilai defaultnya adalah nama pegangan file dengan akhiran "_TOP". |
$FORMAT_TOP_NAME |