(Fwd) [programming] Regex di perl

[Edwin Pratomo]

Kalo fixed size fields seperti ini gak perlu regex. 

------- Forwarded message follows -------
Send reply to:  	linux-programming at linux.or.id
From:           	"Erga Munggaran" <erganov at centrin.net.id>
Date sent:      	Mon, 6 Mar 2000 07:47:26 +0700
To:             	linux-programming at linux.or.id, pau-
mikro at nusantara.net
Subject:        	[programming] Regex di perl

Hi mailist reader,
Saya mau melakukan convert dari satu file tekc ke file teks lain 
dengan
merubah pola isinya.
Dari:
Kebayoran    Kelas 1     Bahasa Indonesia     07:0008:0009:0010:00
Kebayoran    Kelas 2     Sejarah              09:0010:0011:00
Cileduk      Kelas 1     Sejarah              08:3009:00

Menjadi:
insert into jadwal values("", "Kebayoran", "Kelas 1", "Bahasa 
Indonesia",
"07:00", "08:00", "09:00", "10:00");
insert into jadwal values("", "Kebayoran", "Kelas 2", "Sejarah", 
"09:00", 
"10:00", "11:00", "-");
insert into jadwal values("", "Cileduk", "Kelas 1", "Sejarah", 
"08:30",
"09:00", "-", "-");

Mungkin ada yang tahu bagaimana script perlnya?
-- 
erganov at cryogen.com, @ThePentagon.com, @geocities.com
http://jupiter.centrin.net.id/~erganov/ http://www.cryogen.com/erganov/
Join to Indonesia Linux User Group at 
http://clubs.yahoo.com/clubs/indonesialinuxusergroup

--------------------------------------------------------------------------------
Utk berhenti langganan, kirim email ke linux-programming-unsubscribe at linux.or.id
Informasi arsip di http://www.linux.or.id/milis.php3
Pengelola dapat dihubungi lewat linux-programming-owner at linux.or.id


------- End of forwarded message -------