On Thursday 10 January 2002 00:36, you wrote:
> awk '{if ($3>50) $3=999;print $1" "$2" "$3" "$4}' namafile
>
> ganti angka 50 dengan angka sembarang
>
> reply:
> maksud saya sebenarnya:
> misalkan saya ingin agar bila data kolom 3 lebih besar dari 50,
> maka semua data di baris ybs (kecuali pada k
awk '{if ($3>50) $3=999;print $1" "$2" "$3" "$4}' namafile
ganti angka 50 dengan angka sembarang
reply:
maksud saya sebenarnya:
misalkan saya ingin agar bila data kolom 3 lebih besar dari 50,
maka semua data di baris ybs (kecuali pada kolom1) saya rubah menjadi 999.
jadi kalau saya punya data:
awk '{if ($3>50) $3=999;print $1" "$2" "$3" "$4}' namafile
ganti angka 50 dengan angka sembarang
On Wed, 9 Jan 2002, Paulus Allo wrote:
> lsg ajah yah,
> saya punya data dlm bentuk:
> aaa bbb ccc ddd
> eee fff ggg hhh
> dst...
>
> saya ingin membuat script kecil agar andaikata data kolo
Coba yang ini :
#!/usr/bin/perl
$newdata = "";
$LOGFILE = "data.dat";
open(LOGFILE) or die("Could not open file.");
foreach $line () {
$data = $line;
@dataku = split(/\t/, $data); # asumsi data
dipisahkan tab = "\t"
if (@dataku[2] > $batas_tertentu) {
lsg ajah yah,
saya punya data dlm bentuk:
aaa bbb ccc ddd
eee fff ggg hhh
dst...
saya ingin membuat script kecil agar andaikata data kolom ke-3
nilainya lebih dari suatu angka, maka semua data di baris itu
di-set ke angka 999.
gimana yah caranya menggunakan awk,sed,grep?
abisnya saya baru b