On 27-Aug-1999, Khadiyd Idris wrote:
> mas /(.)*\sHaryanto|/
> minta tolong lagi dong
kalo yg laen mau jawab gimana? :) kan di milis nih...
> buatin contoh program (perl)
> yang meng enkode sebuah string ke "url encoding"
> abis bingung sih baca mannya unpack
>
> misal:
> $s="!AABBB@111";
> #setelah di encode jadi
> $s="%xxAABBB%xx111";
> #xx adalah hexadecimal dari '!' dan '@'
#!/usr/bin/perl
# nyontek sedikit dari module URI::Escape
# bikin char->hex map
for (0..255) {
$escapes{chr($_)} = sprintf("%%%02X", $_);
}
$s = "abcde fgh ! + jkl123";
print "Original: $s\n";
$s =~ s/([^A-Za-z0-9])/$escapes{$1}/eg;
print " Encoded: $s\n";
$s =~ s/%([0-9A-Fa-f]{2})/chr(hex($1))/eg;
print " Decoded: $s\n";
> terus ada saran gak
> misalnya saya mau buat database
> tapi yang boleh digunakan hanya DBM
> tapi tiap record saya butuh lebih dari 2 field
> DBM kan hanya dua field (satu key satu value)
kalo satu key dan multiple values, mungkin bisa disimpen sbg string yg
delimited pake suatu karakter, misalnya ":" kayak passwd, nanti
diparse lagi pake split waktu retrieve datanya.
misalnya, keynya nomer induk, lalu valuesnya nama,umur,jabatan:
12345 -> "udin:35:boss"
91123 -> "jojon:45:ceo"
saya sendiri belum pernah pake dbm, jadi mungkin kurang bener ngasih
sarannya..
--
Ronny Haryanto
--------------------------------------------------------------------------------
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3
Pengelola dapat dihubungi lewat [EMAIL PROTECTED]
Hosted by http://www.Indoglobal.com
