At 05:18 PM 11/28/2000, you wrote:
>Halo saya mengambil suatu field dari database yg saya simpan dalam program
>perl.
>dalam database yang saya pakai yaitu IBM - DB2 misalnya :
>
>field type panjang
>safname char 31
>salname char 31
>
>saya pakai perintah print $safname, $salname
>
>tercetak dalam program perl begini :;
>1234567890123456789012345678901 1234567890123456789012345678901 <- 31
>karakter per field
>Ahmad Juniar
>
>Gimana ya supaya spasi tsb dihilangkan. Biasanya pakai regular expression.
>Itu bagaimana ?
>
>Terima kasih.
>
>Ahmad Juniar
ngga mesti pake regular expression sih, tapi memang di perl idiom
ini yang paling sering digunakan. sebelum print, cukup tambahkan
kode berikut:
for($safname, $salname) {
s/^\s+//; # hilangkan whitespace di awal, jika diinginkan
s/\s+$//; # hilangkan whitespace di akhir
}
buat yang ngga familiar dengan RE, tentu akan melihat baris2
dalam loop seperti noise. tapi kalau sudah kenal, you'll feel
right at home.
--
sh
--------------------------------------------------------------------------------
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3
Pengelola dapat dihubungi lewat [EMAIL PROTECTED]
