lynx
Advanced lynx | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору GoldCrab Ну потому что ошибку сделал. Возьми вот это: Код: sub getmember { my $nametocheck = shift; $nametocheck =~ s/ /\_/g; $filetoopen = "$ikondir" . "members/$nametocheck.cgi"; $filetoopen = &stripMETA($filetoopen); if (-e $filetoopen) { open(FILE,"$filetoopen"); $filedata = <FILE>; close(FILE); chomp($filedata); ($membername, $password, $membertitle, $membercode, $numberofposts, $emailaddress, $showemail, $ipaddress, $homepage, $aolname, $icqnumber,$location,$interests, $joineddate, $lastpostdate, $signature, $timedifference, $privateforums, $useravatar, $misc1, $misc2, $misc3) = split(/\|/,$filedata); chomp $privateforums; if (($inmembername eq "Guest") || ($inmembername eq '') || ($password ne $inpassword)) { $inmembername = "Guest"; $inpassword = ''; $allowedentry = ''; print header('text/html; charset=windows-1251'); &error('Незарегистрированный пользователь&Регись иди... '); return; } if($privateforums) { @private = split(/&/,$privateforums); foreach $accessallowed (@private) { chomp $accessallowed; ($access, $value) = split(/=/,$accessallowed); $allowedentry{$access} = $value; } } } else { $userregistered = "no"; } } | Добавлено Цитата: Лучше бы, чтобы при попытке попасть в раздел форума, перебрасывало Guest на страничку - register.cgi, а не предупреждало про регистрацию. Так можно сделать, вообще-то? | Это очень некорректно. Некрасиво. Лучше предлагать, а не заставлять. А в ошибке есть линк на регистрацию. |