>Wah, cocok sekali kalo pake perl :)
>Saya nggak tau gimana anda memanggil program awk dan sed anda, dan
>hubungannya dg script yg mau dibuat ini. Kalo anda jelaskan program2
>ini ngapain mungkin kita bisa bantu.
berikut adalah real problemnya.
saya punya file dgn beberapa kolom. saya ingin mengedit file ini
dimana file baru berisi file lama yg kolom ke-2-nya lebih besar
dari angka 40 dan kolom ke-3 lebih kecil dari 20 maka saya akan ketik:
awk '$2>40' jajal.dat | awk '$3<20 > jajal_edited.dat
kalau file-nya cuma 1 sih sederhana, tapi kalau ada 10 file,
lumayan juga.
file tersebut berisi angka2 yg memiliki angka nol
yg berlebihan, contoh: 82.5 ditulis 82.500000
yg kayak begini justru mengakibatkan error pada saat
file ybs ingin saya load dgn program lain.
jadi kadang2 saya ketik lagi:
sed s/00000/\/g jajal_edited.dat >jajal_final.dat
malah ada yg angka 0-nya kelebihan 3 menjadi 82.5000,
nah, saya harus edit lagi yg kelebihan angka 0 sampai
3 biji dgn cara yg mirip seperti diatas.
karena ada banyak hal yg mesti di-edit saya berpikiran
utk membuat script sehingga tidak perlu ngetik sekian banyak.
script ini akan melakukan proses editing diatas utk setiap file,
jadi perlu masukan file input dan file output sekedar utk
memberikan kebebasan pada pemakai. tapi ekstensinya tetap sama.
jadi, script ini juga akan scr otomatis mengubah file input
(dalam contoh jajal.dat) menjadi file output jajal_final.dat
saya kebingungan dalam membuat script yg interactive ini
dan dalam merubah nama filenya.
>Saya nggak ngerti "repot minta permission" maksudnya apa.
sori, bayangan saya, perl itu memerlukan program lain utk
menjalankannya. apa benar begitu? karena kalau iya, maka saya
kan perlu minta ijin utk menginstall program ybs, sedangkan
kalau shell script, saya tinggal ubah dgn chmod agar bisa
di-execute.
thanks.
Paulus
--
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Dapatkan FAQ milis dg mengirim email kosong ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3
