Assalamualaikum Wr.Wb..
dengan diberikan nya nikmat dan rezeki dari Allah SWT , saya Mr.GagalTotal666 akan share tahap pembelajaran Tipe Array dan Hash di Pemrograman Perl di linux.
Tipe Array dan Hash ? :
Array didefinisikan dengan memasukkan elemen-elemennya ke dalam tanda kurung dan dipisahkan dengan , (koma). Koma tidak wajib diletakkan pada elemen terakhir.
jadi di Perl ini Array ditandai dengan @ , array merupakan kumpulan dari veriabel-variabel yang bertipe sama. Cara pengaksesannya menggunakan index mulai dari nol.
Berikut contohnya :
" @rosa : (10,20,30,40,50,60,70,80) "
jadi Artinya mempunyai array dengan nama @rosa yang mana terdapat 8 elemen yang semuanya bertipe numeric/angka , yaitu index ke nol [0] adalah 10 , index ke satu [1] adalah 20 dan seterusnya.
contoh :
Index ke nol array rosa[0] menyimpan nilai 10
Index ke satu array rosa[1] menyimpan nilai 20
Index ke dua array rosa[2] menyimpan nilai 30
Index ke tiga array rosa[3] menyimpan nilai 40
Index ke empat array rosa[4] menyimpan nilai 50
Index ke lima array rosa[5] menyimpan nilai 60
Index ke enam array rosa[6] menyimpan nilai 70
Index ke tujuh array rosa[7] menyimpan nilai 80
buat variabel @rosa bisa anda ganti terserah anda tergantung anda masukin nya apa ^_^
berikut contoh Array pada string :
" @rosa : (ayah , ibu , kakak , adik) "
Index ke nol array rosa[0] menyimpan nilai ayah
Index ke nol array rosa[1] menyimpan nilai ibu
Index ke nol array rosa[2] menyimpan nilai kakak
Index ke nol array rosa[3] menyimpan nilai adik
namun perl memiliki ke istimewaan pada Tipe Array nya ini bisa menggabungkan ke dua nya dengan tipe array numeric dan array string , sebagai berikut :
@campuran = (12,4500,”mahal”,7600,”murah”,”hemat”);
@makanan = (“makan”,”minum”,500,1500,2000,”rupiah”);
Selain itu dapat juga digabungkan 2 array atau lebih, berikut contohnya :
@a = (1,2,3,4);
@b = (“satu”,”dua”,”tiga”,”empat”);
@c = ( @a,5 , @b,”lima”);
Dengan demikian array @c berisi 1,2,3,4,5,”satu”,”dua”,”tiga”,”empat”,”lima”
Untuk mengetahui panjang suatu array gunakan perintah $#nama_array, misalnya :
@a = (1,2,3,4);
print “ $#a \n”;
berikut contoh pada Array :
#!/usr/bin/perl
# contoh penggunaan array di perl
# nama program : array.pl
@a=(1,2,3,4);
@b=("satu","dua","tiga","empat");
@c=(@a,5,@b,"enam");
print "index ketiga dari array a adalah @a[3]\n";
print "index pertama dari array a adalah @a[1]\n";
print "index kedua dari array a adalah @a[2]\n";
print "index ke-nol dari array a adalah @a[0]\n";
print "\n"; # spasi
print "index ke-nol dari array b adalah @b[0]\n";
print "index ketiga dari array b adalah @b[3]\n";
print "index pertama dari array b adalah @b[1]\n";
print "index kedua dari array b adalah @b[2]\n";
print "\n";
print "panjang dari array c adalah $#c \n";
print "\n";
print "index ke-nol dari array c adalah @c[0]\n";
print "index pertama dari array c adalah @c[1]\n";
print "index kedua dari array c adalah @c[2]\n";
print "index ketiga dari array c adalah @c[3]\n";
print "index ke-empat dari array c adalah @c[4]\n";
print "index kelima dari array c adalah @c[5]\n";
print "index ke-enam dari array c adalah @c[6]\n";
print "index ketujuh dari array c adalah @c[7]\n";
print "index kedelapan dari array c adalah @c[8]\n";
print "index kesembilan dari array c adalah @c[9]\n";
print "\n";
print "semula index kesembilan dari array c adalah @c[9]\n";
@c[9]=" lima ";
print "sekarang index kesembilan dari array c adalah @c[9]\n";
Hash :
Definisi hash mirip dengan array. Setiap elemen hash terdiri atas pasangan indeks (key) dan nilai (value). Berbeda dengan array, indeks di hash menggunakan string, dan nilainya bisa diakses dengan sintaks $hash{'indeks'}.
Contoh :
%aplikasi = (
'bahasa', 'perl',
'server', 'tes server',
'teks', 'vim dan nano',
);
print $aplikasi{'bahasa'}; # perl
Indeks yang mengandung karakter sederhana tidak perlu dikutip karena otomatis dianggap sebagai string. Namun jika indeks mengandung karakter selain huruf dan angka, kutip harus digunakan. Hal ini juga berlaku ketika mengakses elemen. Jadi, $aplikasi{'bahasa'} bisa ditulis sebagai $aplikasi{bahasa}.
saya rasa cukup latihan ke 4 ini ^_^
semoga bermanfaat ^_^
Walaikumsalam Wr.Wb....
Sumber :
[www.perl.com]
[www.belajar-perl.tripod.com]
[www.master.web.id]
0 Comments