On Mon, Feb 01, 1999 at 09:13:53AM +0700, Beast wrote:
> Hi Priyadi Iman Nurcahyo, at 30/01/99 22:25 you wrote :
> ...
> =
> =datanya seperti apa?
> =biasanya script perl sederhana sudah cukup...
> =
>
> Datanya sih sederhana, misal :
>
> username1 pass1
> user2 pas2
> user3 pass3
>
> tapi jumlahnya lumayan banyak ( +- 1000 baris ).
> Saya masih ragu kalau di OPEN, trus pake foreach apa nggak "overflow" nanti :)
> Mungkin ada solusi lain??.
1000 baris masih sedikit pakai foreach...
tapi memang lebih baik jangan semua dimasukkin ke array...
> Satu lagi, gimana nambahin buat no. urutnya?, solanya saya newbie banget di
> perl.
feed script ini dengan data anda, modifikasi "print"-nya...
#!/usr/bin/perl
$urut = 1;
while(<>) {
($user,$pass) = /^([^ ]*) *([^ ]*)\n$/i ;
print "$urut : $user : $pass\n";
$urut++;
}
> Oops, sebelum kelupaan, ada nggak math operator di bash? (saya butuh op.
> buat increment sih...)
man expr
--
There are a few things you should not trust on the Internet:
commercial spams, chain messages, multi level marketing,
Microsoft ads...
______________________________________________________________________
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]
