Темы

1

Perl / Декодирование HTML-формы(метод GET)

« : 07 Января 2006, 19:58:51 »

Пожалуйста, найдите ошибку. Только не предлагайте свои примеры, хотелось бы разобраться в этом.
 
#!C:/usr/local/bin/perl
use CGI::Carp qw(fatalsToBrowser);
print "content-type:text/html\\n\\n";

$form_data=$ENV{\'QUERY_STRING\'};
$form_data =~s /%(..)/pack("C",hex($1))/eq;
$form_data=~tr/+/ /;
@pairs = split (/&/, $form_data);
foreach $pair (@pairs)
{
         ($name,$value)=split(/=/,$pair);
          $form_fields{$name}=$value;
}


При отправке формы выдаёт ошибку:

syntax error at c:\\MYSITE~1\\cgi-bin\\EASY-M~1.CGI line 7, near "$form_data=~tr/+/ /;"
  (Might be a runaway multi-line ;; string starting on line 6)
Execution of c:\\MYSITE~1\\cgi-bin\\EASY-M~1.CGI aborted due to compilation errors.

2

Perl / Help по CGI(perl)

« : 03 Января 2006, 22:33:32 »

Люди, кто знает, помогите.
Я хотел, чтобы cgi скрипт создавал страничку, в которой присутствуют
flash-ролики.
Когда запускаю скрипт вся страница загружается, а вместо flash-роликов белые
пятна.
Причем та же страница в html-формате прекрасно отображается вместе с flash.
У меня установлен Apache 1.32, в error.log никакой ошибки нет.
Что делать и возможно ли вообще это осуществить?