ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Sasha Chorny                         2:469/75.23    07 Jun 2000  04:25:40
 To : Pawel Kaimakow
 Subject : eq "word1"...
 -------------------------------------------------------------------------------- 
 

 
 Monday June 05 2000 12:23, Pawel Kaimakow wrote to All:
 
  PK> Вот такая вещь у меня:
  PK> if ($FORM{'password'} eq "word1") {
  PK>      &ok;
  PK>    }
  >> A как сделать, чтобы еще несколько слов поключить например eq
  >> "word1", "word2"...?
 
 Использовать || или
 %pwd = qw(word1 1 word2 1 word3 1);
 if ($Pwd{$FORM{'password'}}) {
  &ok;
 }
 
     Have a nice day. Sasha.                       [Team MOO]  [Team Ada]
 --- ifmail v.2.15dev5
  * Origin: Hard work has a future payoff. Laziness pays off now. (2:469/75.23)
 
 

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

Тема:    Автор:    Дата:    eq "word1"...   Pawel Kaimakow   05 Jun 2000 13:23:23   eq "word1"...   Sasha Chorny   07 Jun 2000 04:25:40   Re: eq "word1"...   Artem Chuprina   14 Jun 2000 15:48:15