Re: [programming] mengganti variabel
Coba yang ini :
#!/usr/bin/perl
$newdata = ;
$LOGFILE = data.dat;
open(LOGFILE) or die(Could not open file.);
foreach $line (LOGFILE) {
$data = $line;
@dataku = split(/\t/, $data); # asumsi data
dipisahkan tab = \t
if (@dataku[2] $batas_tertentu) {
# kolom ketiga $batas_tertentu
@dataku[2]=999;
}
$newdata .= @dataku[0] . \t . @dataku[1] . \t .
@dataku[2] . \t . @dataku[3] . \n;
}
close($LOGFILE);
$file = 'data.dat'; # dengan syarat direktory dan file
harus bisa ditulisi
open FILE, $file or die gagal menambahkan ke $file:
$!\n;
print FILE $newdata;
close FILE;
-- boot --
On Wed, 9 Jan 2002 14:38:01 +0700
Paulus Allo [EMAIL PROTECTED] 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 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 belajar yg itu sih,
kalau perl, mesti belajar lagi dong
thanks yah.
Paulus
--
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3
Re: [programming] mengganti variabel
awk '{if ($350) $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 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 belajar yg itu sih,
kalau perl, mesti belajar lagi dong
thanks yah.
Paulus
--
Salam
Yohanes [ http://www.negeriimpian.com ]
the details matter quite a lot more than the design ever does.
--Linus Torvalds--
--
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3
[programming] kylix to mysql
Punteeennn... saya coba koneksi database dari kylix ke mysql kok selalu ngehang yaaa... untuk diketahui koneksi database pake komponen sqlconnection pada kylix.. Bagi yang tahu, tolong informasinya yaaa... _ Do You Yahoo!? Get your free @yahoo.com address at http://mail.yahoo.com -- Utk berhenti langganan, kirim email ke [EMAIL PROTECTED] Informasi arsip di http://www.linux.or.id/milis.php3
Re: [programming] akses lpt dengan gcc
- Original Message - From: Jhen Hen Ryco [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Friday, January 18, 2002 3:05 PM Subject: [programming] akses lpt dengan gcc Halo Linuxer, Langsung saja, kalau pakai gcc,header apa yang dipakai untuk akses port Sepertinya sich langsung aja menggunakan device(s) yang akan diakses... Misal berikut ini untuk mengirimkan data ke paralel port 0 : int fd = open(/dev/lp0,O_WRONLY); write(fd,buffer,buffer_length); close(fd); Jadi aksesnya bisa ke direktori /dev, di sini banyak berbagai device(s). Salam juga :) ~ http://groups.yahoo.com/group/belajar-c-cpp Untuk subscribe kirim email kosong ke [EMAIL PROTECTED] http://groups.yahoo.com/group/belajar-java Untuk subscribe kirim email kosong ke [EMAIL PROTECTED] ~ -- Utk berhenti langganan, kirim email ke [EMAIL PROTECTED] Informasi arsip di http://www.linux.or.id/milis.php3
[programming] Streaming Radio
Hi mailist Reader, teman saya mau membuat streaming radio untuk radio kepunyaannya. Rencana awal sih semua dibuat sendiri, jadi setting server Linux, lalu pake Icecast dan tancep tuner radio ke souncardnya. Setelah itu Colocation di salah satu penyedia jasa hosting/ISP. Tapi setelah dikalkulasi biayanya cukup besar juga. Kira-kira ada tidak yang menyediakan jasa streaming radio, yang saya tahu i-2 dulu menyediakan, entah sekarang. Apakah ada vendor penyedia jasa streaming radio lainnya? Berapa harganya? Thanx -- Utk berhenti langganan, kirim email ke [EMAIL PROTECTED] Informasi arsip di http://www.linux.or.id/milis.php3
Re: [programming] mengganti variabel
awk '{if ($350) $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:
5000 0.1 45 80
5010 0.25 55 90
5020 0.7 39 55
maka data keluarannya akan menjadi:
5000 0.1 45 80
5010 999 999 999
5020 0.7 39 55
apa bisa yah dgn awk? apa harus make yg lain??
thanks.
Paulus
--
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3
[programming] SMS Application
Hi mailist reader, teman saya mau membuat aplikasi pengiriman SMS untuk suatu organisasi kepada anggota2nya. Jumlah anggoita ada lebih dari 1000 orang. Kan jari bakalan gempor kalau dikirim satu2. Kalau lewat SMS yang gratis, ada kuotanya. Maka dari itu akan dibuat aplikasi pengiriman SMS ini. Tapi terbentur di modem GSMnya. Kata temen saya sih mesti pake GSM card, kalau gitu besar juga biayanya. Misalnya 1 hari mengirimkan 1 SMS ke anggotanya, nah kalau sebulan banyak juga pengeluaran untuk membayar SMS ke Provider GSm ini. Apa ada cara lain, pihak ketiga, yang menyediakan infrastruktur SMS ini? kalau ada kira2 berapa biayanya? Thanx -- Utk berhenti langganan, kirim email ke [EMAIL PROTECTED] Informasi arsip di http://www.linux.or.id/milis.php3
Re: [programming] akses lpt dengan gcc
Halo Linuxer, Langsung saja, kalau pakai gcc,header apa yang dipakai untuk akses port Sepertinya sich langsung aja menggunakan device(s) yang akan diakses... Misal berikut ini untuk mengirimkan data ke paralel port 0 : int fd = open(/dev/lp0,O_WRONLY); write(fd,buffer,buffer_length); close(fd); Jadi aksesnya bisa ke direktori /dev, di sini banyak berbagai device(s). Salam juga :) untuk jelasnya, Pada Borland c++, kita pakai header dos.h untuk akses lpt sebagai contoh : outportw(0x378,1); Kalau pakai gcc, bagaimana..? -- Utk berhenti langganan, kirim email ke [EMAIL PROTECTED] Informasi arsip di http://www.linux.or.id/milis.php3
Re: [programming] akses lpt dengan gcc
unistd.h header ini untuk melakukan fungsi ioperm(address,) untuk permission mengakses io dengan address tertentu dan asm/io.h ini untuk melakukan perintah-perintah mirip borland c++ yaitu inp, outp, dll ada yang punya tutorial untuk mengakses port dengan cara yang /dev nggak seperti yang dijelaskan pada mail sebelumnya Thanks ::A. Mario Tapilouw ::ICQ # 71504775 ::http://mariotapilouw.n3.net Pada Borland c++, kita pakai header dos.h untuk akses lpt sebagai contoh : outportw(0x378,1); -- Utk berhenti langganan, kirim email ke [EMAIL PROTECTED] Informasi arsip di http://www.linux.or.id/milis.php3
