Pemrograman PERL Lanjutan Bagian 2: OOP Package

kode22pm

 

Melanjutkan kemarin, sebelumnya sudah sampai line 12. Nah ada beberapa sintaks yang bikin penasaran yaitu my dan shift. Apa fungsinya? Yang dimaksud shift adalah menghapus dan mengembalikan nilai suatu nilai atau dengan kata lain sebagai argumen (parameter) dari program. Jika digunakan di dalam sebuah subrutin, maka akan menggeser nilai pertama @_ argumen dari sub. Sedangkan my bisa disebut variabel lokal. Yang artinya hanya bisa digunakan di sebuah subrutin dimana ia didefinisikan.


Wahaha sintaksnya pendek tapi penjelasannya panjang. Lanjut pada line 14 artinya memberikan perintah bersihkan layar pada terminal. Untuk line 16-18 artinya mencetak isi dari variabel. Disini PERL dengan sintaks yang berbeda dari JAVA ataupun PHP yaitu $self->{_nim}
Di line 20 ada sintak bless apa artinya? ketika memanggil subrutin pada $self dan $class, PERL akan tahu, paket mana yang akan digunakan. Sekarang line 24 – 28 adalah subrutin untuk mengatur nama depan. Line 25 untuk parameter, dan line 28 untuk mengembalikan nilai variabel namaDepan. Terus di line 30-33 sama saja namun untuk mendapat input namaDepan.
Agak berbeda kalau biasa menggunakan format .pl namun ini menggunakan format .pm, apa gunanya? Kepanjangan pm adalah Perl Module, gunanya untuk menyimpan fitur yang tersembunyi. Yang nantinya dipanggil melalui .pl, mirip seperti pada pemrograman C yakni menggunakan format .h dan .c

Oke segini dulu, (TS nya udah ngantuk) semoga bermanfaat.

Advertisements

One thought on “Pemrograman PERL Lanjutan Bagian 2: OOP Package

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s