(PERL) Организация ссылки

Anna85
Дата: 25.08.2006 10:06:27
Добрый день, я новичок в этом деле, подскажите пожалуйста, как оргазовать ссылку при изьятии из базы в авторизации человека с ником Пользователь должен осуществляться переход на другую страницу, например со страницы test.pl на страницу filtr.pl


$Password = $Query->param( "password" );
if( defined $Password )
{
open (people,"$syslog");
while( <people> )
{
@Fields = split( /\,/ );
if( $Fields[ 1 ] eq $Name )
{
$Fields[2] =~ s/\s//g;

if( $Fields[ 2 ] eq $Password )
{
$Login = 1;
}
if ($Fields[ 2 ]='Пользователь')
{
<OPTION>
<A HREF="filtr.pl " onClick="mainform.target='_self';mainform.direction.value='redakt';return false;"></A></OPTION>

}
}
}
close (people);
}


Заранее большое спасибо!
Аня
g613
Дата: 25.08.2006 10:14:41
...а по русски ?

что есть и что хочется получить ?

кстати:
if ($Fields[ 2 ]='Пользователь')
{
<OPTION>
<A HREF="filtr.pl " onClick="mainform.target='_self';mainform.direction.value='redakt';return false;"></A></OPTION>

}

какой то странный перловый код...
Anjey aka PM
Дата: 25.08.2006 10:16:34
Как мне кажется просто пятница сегодня
Anna85
Дата: 25.08.2006 10:22:18
На ссылку не смотрите, это мой очередной "шедевр", у меня есть файл называется people в нем храниться ID,NAME,PASSWORD и к нему всего 2 записи

1,Пользователь,post
2,Администратор,1024post

Если автоизируется администратор то он попадает на страницу test.pl если пользователь, то на страницу filtr.pl . Администратор у меня попадает туда куда нужно, а вот с пользователем проблемы. Может это нужно сделать не ссылкой а как-нибудь по другому?

$Name = $Query->param( "name" );
$Password = $Query->param( "password" );
if( defined $Password )
{
open (people,"$syslog");
while( <people> )
{
@Fields = split( /\,/ );
if( $Fields[ 1 ] eq $Name )
{
$Fields[2] =~ s/\s//g;

if( $Fields[ 2 ] eq $Password )
{
$Login = 1;
}
if ($Fields[ 2 ]='Пользователь')
{
# вот здесь наверное должен осуществляться переход

}
}
}
close (people);
}
Anjey aka PM
Дата: 25.08.2006 10:26:24
RTFM: Location
Anna85
Дата: 25.08.2006 10:26:34
Anjey aka PM
Как мне кажется просто пятница сегодня


У меня вся эта неделя одна сплошная пятница
g613
Дата: 25.08.2006 10:45:15
Anna85
На ссылку не смотрите, это мой очередной "шедевр", у меня есть файл называется people в нем храниться ID,NAME,PASSWORD и к нему всего 2 записи

1,Пользователь,post
2,Администратор,1024post

Если автоизируется администратор то он попадает на страницу test.pl если пользователь, то на страницу filtr.pl . Администратор у меня попадает туда куда нужно, а вот с пользователем проблемы. Может это нужно сделать не ссылкой а как-нибудь по другому?
#...
if ($Fields[ 2 ]='Пользователь')
{
# вот здесь наверное должен осуществляться переход

}
}
}
close (people);
}


...при таком раскладе $Fields[ 2 ]='Пользователь' лишнее, ибо всегда истино...
про location уже сказали...
Anna85
Дата: 25.08.2006 10:47:07
Подскажите пожалуйста как можно переделать, я что уже совсем запуталась....
g613
Дата: 25.08.2006 11:01:30
if ( $Fields[1] eq 'Пользователь' ){
  print $Query->redirect('filtr.pl');
}
Anna85
Дата: 25.08.2006 11:02:36
Спасибо большое!