CGI-BBS > CGI > Perl > Mail::CheckUserで、厳密にメールアドレスをチェックしたい。


カレッヂ
カレッヂ


質問者 ヤタロー  投稿日 2007/2/20(火) 16:22:03
Mail::CheckUserを使って、厳密にメールアドレスをチェックしたいのですが、
うまくいきません。モジュールはインストールしているのですが…。エラーになります。

#!/usr/bin/perl

use Mail::CheckUser qw(check_email);

$mailadd='oooo@ooo.ooo.com'; #チェックしたいメールアドレス

if(check_email($mailadd)) { #メールアドレスをチェックする
   print "OK\n";            #OKと表示
}else{
   print "BAD\n";           #BADと表示
}

こんな感じなのですが…。どこがおかしいのか教えてください。

【習熟度】中程度の改造ができる

回答者 ひろ  [削除]  投稿日 2007/2/20(火) 23:52:24
CGIの動作なら最初のほうでヘッダを出力してないだけかも。

print "Content-type: text/html\n\n";

またエラーがでたのならその内容も書いてください。
質問者 ヤタロー  [削除]  投稿日 2007/2/21(水) 08:19:09
ひろさん返信ありがとうございます。content type もちゃんとtext/htmlになっています。
このモジュールのインストール場所が間違っているのかなーと思い、替えてみていますが
すべてだめです。どうしたものか…。こまりました。

返信(回答)する

 


Web裏技