したらばTOP ■掲示板に戻る■ 全部 1-100 最新50 | |

プログラムスレッド

145：女傑：2013/03/05(火) 17:38:49
$url =~ s/(https?|ftp|gopher|telnet|whois|news):([\w|\:\!\#\$\%\=\&\-\^\`\\\|\@\~\[\{\]\}\;\+\*\,\.\?\/]+)/<a href=\"$1\:$2\" target=\"_blank\">$1\:$2<\/a>/g;

$mes =~ s/.{160}/$&<BR>\n/g;
if ($email =~ /\s|\,/) { &error('エラー','Ｅメールを正しくご記入ください.'); }
if ($email !~ /^[^@]+@[^.]+\..+/) {
&error("メールアドレスの書式に誤りがあります。");
}

if ($mes !~ /[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC]/) {
&error("メッセージに日本語が含まれていません");
}
$email =~ s/(^[^@]+@[^.]+\..+)/<a href=\"mailto\:$1\" target=\"_blank\">$1<\/a>/g;
##$email =~ s/(^[^@]+@[^.]+\..+)/<a href=\"mailto\:$1\" target=\"_blank\">$1<\/a>/g;
##$email =~ s/([-\w.]|[\s\!\"\#\$\%\&\'\(\)\*\+\,\-\.\/\:\;\<\?\@\[\\\]\^\_\`\{\|\}\~])/'&#'.unpack('C2',$1).';'/eg; # エンティティコード化
新着レスの表示

名前： E-mail（省略可）：

※書き込む際の注意事項はこちら

※画像アップローダーはこちら

（画像を表示できるのは「画像リンクのサムネイル表示」がオンの掲示板に限ります）
掲示板管理者へ連絡 無料レンタル掲示板