Perl.Help(Me);

← →
TButton © (2004-04-10 06:34) [0]

Вопрос адресую веб-програмерам сайта, надеюсь они сюда заглядывают, а также всем кто знает (хотя бы немного) Perl.
Ситуация, значит, такая. Нужна помощь с созданием системы идентификации пользователя, т.е. чтоб выполняющийся скрипт знал что работает с тем, а не иным пользователем. Сейчас, вмеру своего знания языка зделал такую систему.
1. Пользователь вызывает login.pl?login=<имя>&passw=<пароль>
2. Скрипт проверяет корректность всех параметров. ($login=param("login")||" "; if ($login eq " ") {... e.t.c.)
3. Скрипт выдергивает (если есть) профайл пользователя (users/$login.txt)
4. Читает его в хеш, выискивает в хеше $passw
5. Проверяет идеентичность паролей
6. Если пароль корректен, читает в хеш файл logged.txt
файл состоит из пар строк
...
$login
$id
...
7. Если логину не сопоставлен id - генерит его и дописывает пару (login\id) в хеш
8. Генерит пользователю страницу, указывая где необходимо его id, например, (ссылка на страничку с СМСками) <A href="localhost/cgi-bin/SMS.pl?id=$id">SMS</A> и т.п.

думаю, конечно, что реализация у меня ламерская, поэтому хотелось бы спросить у людей, которые в этом разбираются лучше меня.

И вопрос в догонку. Строки в чате нельзя ведь обновлять прямым обращением к, допустим, showmessages.pl?id=938749237. потому что страница перегружается целиком некрасиво при этом мерцая. Подскажите как сделать правильно.

Заранее благодарен.
Всегда ваш, TButton.

← →
SPeller © (2004-04-10 06:56) [1]

Хоть я и не разбираюсь в перле, кое что общее подсказать могу:
1. Логин и пароль лучше передавать методом POST, чтобы в строке адреса не светить лигином и, тем более, паролем.
2. На счет чата. Обычно с помощью ява-скрита организуют document.write() с текстом нового сообщения.

← →
TButton © (2004-04-10 08:46) [2]

2. вот. а где его взять?
т.е. допустим свое можно самому вписать, а чужое? у мну все входящие сообщения пишутся в log.txt (сразу в HTML со всеми прибамбахами), как из лога выдернуть n последних строк (в принципе понятно) и воткнуть их в документ. даже не так, как из документа вызвать скрипт, дождаться результата, ну а воткнуть результат, наверное сумею.

← →
TButton © (2004-04-10 17:17) [3]

мож кто ссылку подбросит, где узнать можно?

> даже не так, как из документа вызвать скрипт, дождаться
> результата, ну а воткнуть результат, наверное сумею.

Местный чат смотри. Вся клиентская часть (html, js) доступна.

Perl.Help(Me); Найти похожие ветки