Создание серверных приложений на языке PERL

       

Функция Unpack



Функция Unpack

unpack (шаблон, выражение);

Функция, обратная pack(). Распаковывает строку выражения по указанному шаблону в массив значений. В скалярном контексте возвращает значение только первого элемента. Шаблоны такие же как и в pack().

Символ '%' в шаблоне означает, что вы хотите получить вместо значения его контрольную сумму. По умолчанию - 16-битную.

* * * *

Напишите программу, выводящую латинский алфавит. ASCII код первой буквы алфавита - 65. В латинском алфавите 25 букв.

Попробуйте записать в файл IP адрес, затем считать его и сравнить (программно с помощью оператора IF) его с текущем IP адресом. Почему, как вы думаете, они не совпали?
запись IP адреса осуществляйте такой строкой:

print "$ENV{'REMOTE_ADDR'}\n";

Содержание раздела