On Sun, 18 Nov 2001, Bambang Ajriman wrote:
cara membaca file di perl
>
> baru belajar perl nih,
>
> ada yang bisa ngasih contoh kode buat
> membaca file configurasi nggak?
>
> yang sederhana aja, misalnya spt baca smb.conf,
> trus memasukkan nilai2nya ke variabel2 di perl.
>
> mudah2an learning by example bisa bikin lebih cepet ngerti,
>
> thx ya ..
>
>
#!/usr/bin/perl
$FileName = "FileName.conf";
open(FH,"$FileName") || die " Could Not Open $FileName \n\n";
while(<FH>) {
print "$_"; # untuk membaca perbaris di file $FileName
($VarName,$VarValue) = split(/=/,$_); # split tanda '=' dan dimasukan
# ke dalam $VarName dan $VarValue
## disini kita sudah mendapatkan variable dan seterusnya terserah anda
}
Always be
^�_�^
H E N G K Y
- Mess With The Best -
- Die Like The Rest -
--
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3
