【Perl 】初心者コーナーPart5
814 ：名無しさん＠お腹いっぱい。：
チャットにURLを打たせてメッセージの前に「□」をつけてリンクを張ろうとしているのですが
URLとメールアドレスを打っていないとどちらともにリンクを張らず
かたほうにあるとそちらにリンクを張るようにしたいのですが
if ($in{'email'} eq "" & $in{'url'} eq "") { $name = "$pointer □ <b>$in{'name'}</b>"; }
if ($in{'email'} eq "" & $in{'url'} ne "") { $name = "$pointer <a href=\"http://$in{'url'}\" target='_blank'>□</a> <b>$in{'name'}</b>"; }
if ($in{'email'} ne "" & $in{'url'} eq "") { $name = "<a href=\"mailto:$in{'email'}\">$pointer</a> □ <b>$in{'name'}</b>"; }
↑のようにしてもうまくいきません。
わかる方がいればよろしくお願いします。
URLとメールアドレスを打っていないとどちらともにリンクを張らず
かたほうにあるとそちらにリンクを張るようにしたいのですが
if ($in{'email'} eq "" & $in{'url'} eq "") { $name = "$pointer □ <b>$in{'name'}</b>"; }
if ($in{'email'} eq "" & $in{'url'} ne "") { $name = "$pointer <a href=\"http://$in{'url'}\" target='_blank'>□</a> <b>$in{'name'}</b>"; }
if ($in{'email'} ne "" & $in{'url'} eq "") { $name = "<a href=\"mailto:$in{'email'}\">$pointer</a> □ <b>$in{'name'}</b>"; }
↑のようにしてもうまくいきません。
わかる方がいればよろしくお願いします。
|
|
|