hi temen-temen mau tanya sesuatu nih :
1. Ada suatu file dengan format terdiri dari satu kolom dan lima baris.
Judul file tersebut daftarBuah. Isi dari file tersebut:
Mangga
Durian
Jambu
Salak
Belimbing
2. Kemudian kita lakukan operasi filehandles di file tersebut sbb:
$buahbuahan = '/home/user1/daftarBuah';
open (daftarBuah, $buahbuahan);
@buahbuahan = <daftarBuah>;
chop @buahbuahan;
close (daftarBuah);
3. Setelah itu kita lakukan operasi loop terhadap @buahbuahan, sbb:
foreach $buahYangTidakSuka (@buahbuahan)
if (@daftarBuahKesukaan neq @buahbuahan)
{ push (@daftarBuahYangTidakSuka, $buahYangTidakSuka); }
else
return 1;
BTW: @daftarBuahKesukaan isinya hanya Durian dan Mangga.
4. Yang jadi masalah/pertanyaan, gimana caranya agar file daftarBuah
tersebut berubah menjadi hanya Mangga dan Durian berdasarkan hasil loop
di atas. Jambu, Salak dan Belimbing jadi ngga ada di isi dari file
daftarBuah.
Tolong kasih tahu di perl manpages yang mana hal ini dibahas.
5. Program di atas dibuat pakai perl, tapi kalau ada yang mau sumbang
saran, bahasa pemrograman apapun always welcome.
6. Ngomong2x, ada milis pemrograman berbahasa Indonesia ngga sih?
NB: Ogut baru nongol lagi di sini, eeh ternyata udah ada ceweknya, bagus
deh kalau gitu ;)
______________________________________________________________________
Utk berhenti langganan kirim email ke [EMAIL PROTECTED]
Sudah cari di arsip? http://www.linux.or.id/milis.php3#arsip-id-linux
Utk info etika diskusi, kirim email kosong ke [EMAIL PROTECTED]
