Re: [apache-talk] hmm

[Artur Penttinen <artur@xxxxxxxxxxx>]

>>>>> "YK" == Yuri Kuzmenko <yuri@xxxxxxxxxxxxxxx> writes:

    YK> Не хочет. ;-((( Народ! Помогите, please! Заставьте работать
    YK> этот кусок. Буду до смерти благодарен!

	Проверил у себя - работает.

#!/usr/local/bin/perl

use CGI qw(:standard :nph);


$qt = new CGI;

$q = $qt->param('query');

if ($q) {
    print $qt->redirect(-uri=>"http://www.liga.kiev.ua",-nph=>1);
}
else {
  print
    header,start_html(self_url);

  print
    startform,
    textfield('query'),
    submit("Search!"),
    endform;

  print
    end_html;
}

exit(0)

=============================================================================
=               Apache-Talk@xxxxxxxxxxxxx mailing list                      =
Mail "unsubscribe apache-talk" to majordomo@xxxxxxxxxxxxx if you want to quit.
=       Archive avaliable at http://www.lexa.ru/apache-talk                 =