Pemrograman PERL Bagian 2: Operator Logika dan I/O

Wah nggak terasa sudah hari ke-2. Sebenarnya sudah mulai malas, mungkin disini diuji konsistensi. Oke melanjutkan tulisan kemarin pemrograman Perl bagian 1. Hari ini dilanjut dengan tipe data array pada Perl. Sudah tahu array kan? Iya bukan alay.


kode4.pl
#!/usr/bin/perl
@x = (5,6,7,8);
@y = (“lima”,”enam”,”tujuh”,”delapan”);
print “Elemen ketiga dari \@x = $x[2] \n”;
print “Elemen pertama dari \@x = $x[0] \n”

Disini sintaks Perl berbeda dengan bahasa pemrograman lainnya. Digunakan tanda @ untuk menyatakan alay eh array.

Berikut hasil output programnya:

Perl4
Sekarang masuk ke operator seluler eh. Didalam Perl mereka juga menggunakan string untuk operator logika.
==    eq
!=    ne
>     gt
<    lt
>=    ge
<=    le

Sekarang contoh programnya, ups nanti ya di struktur kondisional bakal bahas. Sekarang masuk ke file handle dulu, sama halnya dengan I/O pemrograman lain. Dalam pemrograman Perl mempunyai 3 serangkai file handle yakni: STDIN, STDOUT, STDERR. Sekilas mirip dengan bahasa C. Berikut masing-masing fungsinya.

STDIN: Untuk input dari keyboard
STDOUT: Untuk output di layar monitor
STDERR: Untuk error handling

Nggak usah banyak cin cau nanti mules. Ini contoh programnya:

kode5.pl
#!/usr/bin/perl
print “Nama kamu, iya kamu = “;
$nama = <STDIN>;
print “Aku suka $nama \n”;

#Contoh file handle lain
print STDOUT “Hai soleh \n”;
print STDERR “Awas ada kucing galak !!! \n”;

Ini skrinsutnya:

Perl5

STDOUT dan STDERR sama-sama digunakan untuk mencetak, agak bingung… bedanya dimana seh? Lanjut biar nggak pening, bisa dilihat dari program atas. Efek samping STDIN adalah selalu menyisakan 1 line kosong pada output. Gimana caranya agar tidak ada line kosong? Hal tersebut bisa dihandle dengan fungsi chop. Dengan fungsi ini line kosong bakal hilang.

kode6.pl
#!/usr/bin/perl
print “Nama kamu, iya kamu = “;
chop($nama = <STDIN>);
print “Aku suka $nama \n”;

#Contoh file handle lain
print STDOUT “Hai soleh \n”;
print STDERR “Awas ada kucing galak !!! \n”;

Ini makhluk astralnya:

Perl6
Tu bi kontinyu…

Advertisements

One thought on “Pemrograman PERL Bagian 2: Operator Logika dan I/O

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