Forum Webscript.Ru

Программирование => Perl => Тема начата: hoochie от 24 Февраля 2005, 18:50:04

Название: WEB: не присваивается значение переменной
Отправлено: hoochie от 24 Февраля 2005, 18:50:04
Еще раз хочу обратиться за помощью....

есть страница... любая...
допустим

TITLE
What to find?





ну и закрывающие теги, не в этом суть... т.е есть строка ввода и кнопка...

сам скрипт:

#!/usr/bin/perl
use CGI qw(:standart);
print "Content-Type: text/html\\n\\n";
$string=export ("string");

print "


<br />searching<br />




Ваша строка -> " .join(" ", $string, " ")."




";

$dbh->disconnect;
print "OK\\n";

т.е. должна просто показаться бегущая строка, которую ввел пользователь

Проблема:
при нажатии на кнопку появляется просто чистая страница. Но если я делаю тоже самое, но значение $string присваиваю сразу в скрипте, то все нормально, все бежит; также при выполнении скрипта в консоли значение присваивается и выдается код страницы.

может я что-то не так делаю?? хотя столько источников прочитал по данной проблеме, да и пример в принципе простейший.:confused:

Название: WEB: не присваивается значение переменной
Отправлено: AnnA от 24 Февраля 2005, 19:01:16
$string=export ("string");
замените на
$string=param(\'string\');
Название: WEB: не присваивается значение переменной
Отправлено: 2NetFly от 24 Февраля 2005, 19:03:35
Насколько я понял.

$string = param("string");

Странно, что ты не получил ошибку "Undefined subroutine".
Название: WEB: не присваивается значение переменной
Отправлено: hoochie от 24 Февраля 2005, 19:04:26
2 Anna: пробовал, результат тот же...
2 2NetFly: как бы сделал ты??
Название: WEB: не присваивается значение переменной
Отправлено: AnnA от 24 Февраля 2005, 19:08:53
Цитировать
hoochie:
use CGI qw(:standart);

это неправильно. ;) Будьте внимательны.
у Вас там одна буковка неправильная.
используйте use strict; в скриптах
Название: WEB: не присваивается значение переменной
Отправлено: hoochie от 24 Февраля 2005, 19:12:40
какая же??
Название: WEB: не присваивается значение переменной
Отправлено: 2NetFly от 24 Февраля 2005, 19:18:49
Анна верно говорит.
use CGI qw(:standard);
Название: WEB: не присваивается значение переменной
Отправлено: AnnA от 24 Февраля 2005, 19:18:54
экий Вы ленивый. поглядите в perldoc CGI.
правильная запись выглядит так:
use CGI qw(:standard);

[OFF]долго бы Вам пришлось эту буквочку отлавливать[/OFF]
Название: WEB: не присваивается значение переменной
Отправлено: 2NetFly от 24 Февраля 2005, 19:21:01
Цитировать
AnnA:
правильная запись выглядит так: use CGI qw(:standart);

Все таки standard (я так понимаю, опечатка просто =)
Название: WEB: не присваивается значение переменной
Отправлено: hoochie от 24 Февраля 2005, 19:21:21
Анна!!!! спасибо!!!
всем спасибо за поддержку!!!!
теперь все работает :-)
Название: WEB: не присваивается значение переменной
Отправлено: AnnA от 24 Февраля 2005, 19:25:13
2NetFly исправилась! :)))
скопировала просто его вариант, а ипсравить забыла.
я-то у себя пишу всегда: use CGI \':standard\';
извините за оффтоп. :)

hoochie ага. пож-ста. ;)