Темы

1

PHP / Разбираю примеры авторизации и такая проблема

« : 17 Августа 2004, 14:04:08 »

-------index.php----------

 
 
 
 
 

   Логин:

   Пароль:

   
 

 

------------------------auth.php-----------
    session_start();
    if($Submit){
        if(($user_name=="123")&&($user_pass=="111")){
      $logged_user = $user_name;
         session_register("logged_user");
           header("Location: secr.php");
      exit;
    }
  }
  ?>

Вы ввели неверный пароль!


в любом случае выдается сообщение "Вы ввели неверный пароль!" файлы ссесий создаются, никаких сообщений об ошибках нет. В чем может быть проблема?

2

Perl / примеры LDAP

« : 09 Августа 2004, 13:58:09 »

Не могу нигде найти модуль Net:LDAP для 6 версии. И нигде не могу найти примеры(исходники) Авторизации LDAP на Perl. Кто поможет?

3

Другие серверные скрипты / Python кто что знает, есть ли дока в рунете

« : 02 Августа 2004, 16:47:06 »

Если кто пишет, писал или собирается, то если не трудно напишите пару ссылок

4

Perl / Как удалить одинаковые значения массива?

« : 06 Июля 2004, 11:54:24 »

Сортирую массив, нечто вроде: a,b,c,d,a,a,d,d  и.т.п

@Iname=sort{$a cmp $b} @Iname;

резултат получается a,a,a,b,c,d,d,d итого около 50000 элемнтов, как можно удалить одинаковые значения?

5

Базы данных / Sql запрос

« : 05 Июля 2004, 16:38:18 »

Кто нить может написать ссылки на примеры Sql запросов?

6

Perl / можно ли упростить?

« : 17 Июня 2004, 14:01:18 »

if (substr($str,0,1)=~/\\./) {$str=~ s/.{1}//;}
       else{ if (substr($str,1,1)=~/\\./) {$str=~ s/.{2}//;}
   else {$str=\'--\';} }


чтоб бы чтонить такого вида

if (substr($htp,0,1)=~/\\./ or substr($htp,1,1)=~/\\./)
 { и чтоб если выполнилось правое условие делай то-то, если левое делай другое}

else  else {$str=\'--\';}

Такое возможно в Perl?  

7

Perl / Как удалить 1 символ строки

« : 11 Июня 2004, 14:20:48 »

Как это сделать?

8

Perl / LDAP кто работал?

« : 31 Мая 2004, 15:07:34 »

Как собрать данные LDAP, где можно посмотреть примеры, описания и прочее? Заранне спасибо!