Вообще-то, я пишу восновном на C++, но тут приперло написать CGI-скрипт на Perl (вижу его первый раз). Первый глупый вопрос : Как в Perl делается преобразование типов?
Пример:
В POST-запросе получаем некоторые данные, читаем их:
my $packet="";
read (STDIN, $packet, $ENV{CONTENT_LENGTH}) == $ENV(CONTENT_LENGTH};
теперь надо трактовать первые 4 байта как DWORD, следующие 2 байта как WORD, а остольное как строку.
Как это грамотно реализовать?
[Perl] Глупые вопросы по Perl11.06.01 10:02 Автор: Alёkz Статус: Незарегистрированный пользователь
> Вообще-то, я пишу восновном на C++, но тут приперло > написать CGI-скрипт на Perl (вижу его первый раз). Первый > глупый вопрос : Как в Perl делается преобразование типов? > Пример: > В POST-запросе получаем некоторые данные, читаем их: > my $packet=""; > read (STDIN, $packet, $ENV{CONTENT_LENGTH}) == > $ENV(CONTENT_LENGTH}; > > теперь надо трактовать первые 4 байта как DWORD, следующие > 2 байта как WORD, а остольное как строку. > > Как это грамотно реализовать?
Никак нечё не надо - берёшь строку из файла (типа стринг) - берёшь число 5 и умножаешь на строку! =:-o вот и всё приоброзование, если в строке были только числа - получишь результат умножения - иначе - еррор. Перл рулит - сам всё знает что и где =;-)
Нет там никакого word dword если надо чёта подобное - делай array.
Рульные фанки - chr, ord пригодяться.
Перл для обработки текста - там туча функций для фильтра строк, только медленые иногда :(
С методом пост можешь сделать так:
@zapros = split(/ /, $line);
всё - в @zapros[0] - метод
в @zapros[1] файл
@zapros[2] версия хттп протокола.
подробно о проекте
Анализ криптографических сетевых...
новое сообщение
закрытая нитка
новое сообщение
в закрытой нитке
старое сообщение
