|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Koulayev Vladimir 2:5020/400 19 Oct 2000 17:48:16 To : All Subject : Как расшифровать эти сообщения? --------------------------------------------------------------------------------
Здравствуйте!
Есть скрипт, в начале которого стоят строки
#!/usr/local/bin/perl
use strict;
# use CGI qw (:standard);
# use CGI::Carp qw (fatalsToBrowser);
# Задаем максимальный размер буфера для пересылки данных скрипту
$CGI::POST_MAX = 4096;
# Отключаем буферизацию
$|=1;
#====================================================================
# Основная часть программы. После этого фрагмента идут одни процедуры
# Читаем данные от пользователя
if (&GetFormInput eq 'remember')
{
&RememberPassword;
}
else
{
# Инициализируем переменные и производим подготовительные работы
&Initialize;
# Если введенные пользователем данные подходят по формату...
if (&CheckFormData)
{
# ...если не совпало, добавляем нового пользователя в базу
&RegisterSuccess;
}
}
#====================================================================
#====================================================================
# Функция напоминания забытого пароля
sub RememberPassword
{
# Определяем начальные значения
$email = $field{'email'};
$database_file_name = "database/database.txt";
$html_filled_file = "html/form_filled.html";
$html_file = "html/form_remember.html";
В PerlDebugger'е проверяем с ключом -w и получаем строки типа
Global symbol "$email" requires explicit package name at script line 41.
Global symbol "%field" requires explicit package name at script line 41.
Global symbol "$database_file_name" requires explicit package name at script
line 42.
Global symbol "$html_filled_file" requires explicit package name at script
line 43.
Global symbol "$html_file" requires explicit package name at script line 44.
Global symbol "@DATABASE_FILE" requires explicit package name at script line
50.
Global symbol "$database_file" requires explicit package name at script line
52.
Variable "@database_file" is not imported at script line 55.
Global symbol "@database_file" requires explicit package name at script line
55.
Что у меня не так сделано? Где можно прочитать расшифровку сообщений об
ошибках?
Заранее спасибо.
--- ifmail v.2.15dev5
* Origin: Moscow Cellular Communications (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/7502f0d47ad7.html, оценка из 5, голосов 10
|