ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Sergey Paradeev                      2:4642/8       21 Jan 2002  07:27:18
 To : All
 Subject : regexp
 -------------------------------------------------------------------------------- 
 

     Проверяю в форме значение элемента, должно иметь 12 цифр. И нужно типа
 
     если (не 12 цифр) {
         print "Error <br>";
     }
 
     Пробовал так, не получается:
 
     $FORM{elem1}="123456789012";
     if(!$FORM{elem1}=~/\d\d\d\d\d\d\d\d\d\d\d\d/) {
         print "Error <br>";
     }
 Sergey
 
 --- GoldED+/LNX 1.1.5-20010807
  * Origin: К сожалению оригин у меня не оригинален (2:4642/8)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    regexp   Sergey Paradeev   21 Jan 2002 07:27:18   regexp   Dmitry Morozhnikov   21 Jan 2002 12:44:10   Re: regexp   PROext   21 Jan 2002 12:39:59