----- Original Message -----
From: "Yanu Widodo" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Wednesday, July 26, 2006 10:33 AM
Subject: [linux-programming] cara menentukan field dalam awk
> Dear Linux Expert,
>
> misalnya saya ada file test.txt seperti ini
>
> 0,060723,aa,102335,aa
> 0,060723,aa,102336,aa
> 1,060723,ac,102337,xx
> 1,060723,ad,102338,xx
> 0,060723,aa,102339,aa
> 0,060723,aa,102340,aa
>
> saya ingin mencetak field ke-1, ke-2, ke-5 dengan awk
> caranya gimana ya ?! [sekalian link tutorial awk/perl programming by
> example kalau ada]
>
> trims,
>
> yanu
>
>
maaf, ini kalo pake perl :
#!/usr/bin/perl
$FILEKU="test.txt";
$FILEHASIL="hasiltest.txt";
print "[+] mulai proses...\n\n";
&buka();
foreach $elemen (@ary) {
$elemen=~s/(.+?)\,(.+?)\,(.+?)\,(.+?)\,(.+?)/$1\,$2\,$5/;
print $elemen;
#&tulis($elemen);
}
&tulis(@ary);
print "\n\n[+] akhir proses...\n\n";
sub buka {
open (FH,"<$FILEKU");
@ary=<FH>;
close FH;
}
sub tulis {
open (FHKU,">$FILEHASIL");
#print @_;
print FHKU @_;
close FHKU;
}
#EOF
kalo pake awk mah, saya kurang tau... :)
./iko
www.geocities.com/iko94
--
Berhenti langganan: [EMAIL PROTECTED]
Arsip dan info: http://linux.or.id/milis