![]() |
Perl: строковые ф-ции. вопрос
Есть проблема. Нужно отбиться от ботов...
Они сцуке засерают гостевуху одну. Не мою... но помочь надо) Вобщем, e-mail фильтруется так: PHP код:
каким образом запретить использование этих ящиков? Warning: это Perl. На php я и сам бы давно сделал) |
ну допиши еще что-нить типа:
print_error 'Боты отокуют!!!' if $Form{email} =~ /aol\.com$/; |
именно в таком порядке?
или if ($Form{email} =~ /aol\.com$/) {print_error 'Боты отокуют!!!'} |
Цитата:
|
print "Hello" if ($i==1);
if ($i==1) {print "Hello";} ента альтернативы друг друга тоесть и в твоем случае что print_error 'Боты отокуют!!!' if $Form{email} =~ /aol\.com$/; if ($Form{email} =~ /aol\.com$/) {print_error 'Боты отокуют!!!'} одно и тоже |
я уже осознал сей факт. всем спасибо. всем плюсы.
closed By Topicstarter |
| Время: 05:16 |