Ok,
thanks Mas Yusuf,
Namun sekarang kondisinya begini,
input tsb berupa email address pada input form di web,
nah jadi saya ingin mengubah inputan user "[EMAIL PROTECTED]" menjadi
"username%namadomain.dom" pada process di perl.
Soalnya kalo di input form kan gak mungkin mereka nginput
kenapa harus diubah
kalau dia berupa isian $FORM{'email'}
kan bisa langsung di deteksi dan tidak perlu @-nya dirubah
ke bentuk % ...
kecuali kalau dalam bentuk variable seperti
maka harus ditulis dalam bentuk
email ="saya\@email.com";
bagaimana ?
Ari Manaen wrote:
Ok,
thanks Mas Yusuf,
On 12-Mar-2001, Ari Manaen wrote:
bagaimana caranya pakai Perl, saya merubah
misalnya [EMAIL PROTECTED] menjadi manaen%yahoo.com ?
Tidak jelas skrg "[EMAIL PROTECTED]" itu ada di mana. Anggap saja ada
di $input, maka:
$input =~ s/@([^@]+\.\w+)$/%$1$/g;
Ronny
Hi,
Cara dibawah sudah dicoba namun jadinya muncul "Internal Server Error"
sebagai informasi berikut ini listing salah satu part-nya:
elsif ($sessionid =~ /\@/)
{
@pop = split (/ /, $sessionid);
$popname = $pop[0];
# $popname =~ s/\@/\%/g;
#$popname =~
itu kalau di line 66 ada komentnya (#) maka errornya ada di
baris 53 ...
coba baris ke 53 dikasih tanda \ pada tempat sebelum $, misalnya \$.
maaf mungkin sudah tahu, tanda \ ini digunakan untuk menampilkan nilai karakter
sesuai dengan huruf selanjutnya, jadi $a dan \$a akan dianggap lain.
yang
Wah thanks banget nih...:)
btw sekarang error messagenya udah ilang :)
oh ya yang "#line 66" tadi sebenarnya "#line 53" maksudnya :)
tau tadi lagi mikir apaan jadinya nulisnya line 66 lagi padahal 53 :)
oh ya, tapi tetep aja blum bisa masuk ke webmailnya :( apa ada hubungannya
dengan $sessionid =
halo semua,
aku anggota baru nih, dan juga baru di perl.=20
Ada yang tau caranya ngirim message lewat sms pake
perl ?
Apa aja yg kira2 diperlukan=20
Totok
__
Do You Yahoo!?
Yahoo! Auctions - Buy the things you want at great prices.
