----- Original Message ----- 
From: "Yanu Widodo" <[EMAIL PROTECTED]>
To: <linux-programming@linux.or.id>
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

Kirim email ke