Этапы создания скрипта

2019-12-29

171

Обсуждений (0)

0.00 из 5.00 0 оценок

1 2 345

1. Создать форму для вызова скрипта.

2. Создать сам скрипт.

3. Отладить скрипт. Проверить отсутствие ошибок (если это возможно, лучше проверить все возможные пути выполнения программы).

4. Поместить скрипт на сервер и не забыть дать ему права на выполнение.

5. Связать скрипт с формой, вставив его имя в параметр action тэга form. Например:

<form action=/cgi-bin/ bd_name_num/example.pl method=get>

6. Убедиться, что скрипт правильно работает вместе с формой.

Основные части Perl скрипта

В общем случае любой Perl скрипт состоит из четырех ключевых частей:

1. Настройка. Первая часть скрипта обязательно запускает интерпретатор и устанавливает переменный, используемые в теле скрипта. Для запуска интерпретатора необходимо знать правильный путь к программе.

2. Чтение входных данных. Эта часть "считывает" и сохраняет в переменных входные данные в удобной для обработки форме. Эта часть обычно неизменна во всех скриптах.

3. Обработка входных данных. Эта часть соответствующим образом обрабатывает введенные данные. Она может быть простой (около 5 строк) или очень сложной (более 1000 строк) в зависимости от выполняемой задачи.

4. Вывод результатов. Пользователь обычно ожидает какого-либо ответа на свои действия. Эта часть достаточно проста в реализации.

Пример взаимодействия программы Perl с HTML формой

Шаг 1 . Создание формы

Создадим для простоты форму, содержащую всего одно поле и позволяющую пользователю зарегистрировать его имя. Напишем в редакторе следующий текст:

<html>

<head>

</head>

<body>

<b>Введите Ваше имя: </b>

<b>Введите Email: </b>

<br><b>Введите Сообщение: </b>

</form>

</body>

</html>

Рисунок 3 - Внешний вид созданной формы

Сохраните файл на диске под именем form . html.

Шаг 2 . Создание скрипта

Предложенный ниже скрипт принимает введенные данные, сохраняет их в БД guest и показывает сообщение, содержащее ссылку на файл в котором представлены результаты выборки из таблицы.

Наберите в редакторе текст программы и сохраните в файле testform.pl в вашем каталоге, каталога cgi-bin вашего web-сервера.

Убедитесь, что первая строка программы содержит правильный путь к программе-интерпретатору.

Создайте БД, в которой вы будете сохранять вводимые пользователем данные. В представленном ниже примере это таблица Messages

Рисунок 4 - Структура таблицы Messages

Содержимое файла testform . pl

#!/usr/local/perl/bin/perl

use DBI;

require "cgi-lib.pl";

&ReadParse(*input);

# Имя пользователя БД

$opt_user="root";

# Пароль доступа к БД

$opt_password="";

# Имя базы

$database="guest";

$url="http://localhost/db/form.html";

$cgi="http://localhost/cgi-bin/db/result.pl ";

# Вывод http-заголовка

print "Content-type: text/html\n\n";

# Подключение к базе

$dbh = DBI->connect("DBI:mysql:database=$database",

$opt_user,$opt_password) ||

die "Can't connect: $DBI::errstr\n";

$query="INSERT INTO messages (user_name, user_email, user_message) values ('$input{'user_name'}','$input{'user_email'}',’$input{'user_messages'}’)";

# Подготовка

$sth = $dbh->prepare($query);

$sth->execute();

# Отключение от базы

$rc = $sth->finish;

$rc = $dbh->disconnect;

print "<br><a href='$url'>Вернуться на страницу форм</a><br>";

print "<br><a href='$cgi'>Просмотреть сообщения</a><br>";

2019-12-29

171

Обсуждений (0)

0.00 из 5.00 0 оценок

1 2 345

Обсуждение в статье: Этапы создания скрипта

Обсуждений еще не было, будьте первым... ↓↓↓