|
Стандарт окошко авториз в Перл
|
|||
---|---|---|---|
#18+
Как собств говоря сие окошко вызвать ? Если на ПХП это выглядит примерно так if ($q->Exist($PHP_AUTH_USER)==0) { header( 'WWW-Authenticate: Basic realm="admin"' ); header( 'HTTP/1.0 401 Unauthorized' ); exit; } то как на Перле ? ... |
|||
:
Нравится:
Не нравится:
|
|||
03.07.2003, 00:56 |
|
Стандарт окошко авториз в Перл
|
|||
---|---|---|---|
#18+
Точно не могу сказать, как это может получиться. Просто я уже давно ушел в другой стан - стан программинга на пхп.... Ну, а если конкретно по теме, то вот:\r Почтай, там написан такой код для перенаправления на другой урл:\r Код: plaintext
Это аналог пхповского\r Код: plaintext
Так что соответственно правь код, и принтуй... Тока не забудь, что до этих принтов не должно ничего выводиться :).... ... |
|||
:
Нравится:
Не нравится:
|
|||
03.07.2003, 03:01 |
|
|
start [/forum/search_topic.php?author=romalong&author_mode=last_topics&do_search=1]: |
0ms |
get settings: |
11ms |
get forum list: |
16ms |
get settings: |
10ms |
get forum list: |
12ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
146ms |
get topic data: |
12ms |
get forum data: |
3ms |
get page messages: |
49ms |
get tp. blocked users: |
2ms |
others: | 665ms |
total: | 934ms |
0 / 0 |