Oke thank mas hengky sama mbak salma atas bantuannya :)_
tapi setelah saya jalankan Could Not open melulu
ternyata setelah tanda $ saya hilangkan baru bisa
open(FH,"$namaFile") || die "Could Not Open File $namaFile \n";
^ tanda $ dihilangkan ^
Oke sekali lagi thanks
--------
Chimera
> Ini Dalam Bahasa perl
>
> open(FH,"$namaFile") || die "Could Not Open File $namaFile \n";
>
> while(<FH>)
> {
> print "Baris Yang ke $. = $_ \n" ;
> }
>
> close(FH)
>
> Semoga Jalan
>
> Always be
>
>
>
> ^�_�^
> H E N G K Y
>
--
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3
