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, а не предупреждало про регистрацию. Так можно сделать, вообще-то? |
Это очень некорректно. Некрасиво.
Лучше предлагать, а не заставлять. А в ошибке есть линк на регистрацию. |
