Декодирование данных с помощью модуля CGI

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

В комплект поставки языка Perl входит модуль с именем CGI.pm, который предназначен для облегчения написания CGI-программ. Главное предназначение этого модуля - чтение и декодирование данных. В модуле есть и другие полезные функции, но сейчас нас интаресует только функция чтения и декодирования данных. Для того чтобы декодировать данные, переданные вашей программе, вы должны так импортировать модуль CGI.pm:

use CGI qw (:standard);
$query = new CGI;

После этого все данные копируются в кэш с именем param, который связан с объектом запроса с помощью переменной с именем $query. Таким образом, если пользователь передал данные формы, содержащие поле с имененм last_name, значение этого поля можно сделать доступным через переменную с именем $last_name. Выполняется это следующим образом:

$last_name = $query->param('last_name');

Рассмотрим это выражение по частям:

1. $last_name - это имя переменной, которой я хочу передать значения из поля формы.

2. $query - имя объекта; который я создал в этой программе.

3. Оператор -> используется для доступа к кэшу param объекта query.

4. Выражение в скобках 'last_name' используется для доступа к элементу кэша с ключом last_name.

Это все, что касается декодирования данных с помощью модуля CGI.pm, который делает за вас всю работу.