Сообщения

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)

« : 04 Января 2006, 13:54:12 »

Всё, проблема решилась, спасибо всем.

3

Perl / Help по CGI(perl)

« : 04 Января 2006, 13:48:04 »

Проверил, но проблема осталась та же самая.
Он принципиально отказывается открывать файлы swf,
всё остальное работает отлично.

4

Perl / Help по CGI(perl)

« : 03 Января 2006, 23:15:20 »

А можете привести работающий прмер кода,
где бы создавалась страница с вставленным flash-роликом.

5

Perl / Help по CGI(perl)

« : 03 Января 2006, 23:04:01 »

Извините за смайлики.

6

Perl / Help по CGI(perl)

« : 03 Января 2006, 23:01:53 »

Вот весь код:
#!C:/usr/local/bin/perl        
use strict;
use CGI::Carp qw(fatalsToBrowser);  
print "content-type:text/html;application/x-shockwave-flash\\n\\n";
print\'  








 
 
   
 
 
   
   
   
   
   
   
   
   
   
   
   
   
 
 
   
   
   
   
   
   
   
   
   
   
   
   
 
 
   
   
   
   
   
   
   
   
   
   
   
   
 
 
   
   
   
   
   
   
   
   
   
   
   
   
 

		Логин:			Пароль:					Забыли пароль?

\';

7

Perl / Help по CGI(perl)

« : 03 Января 2006, 22:50:59 »

Нет, пути я проверял, с ними всё в порядке.
Может с content-type что-нибудь попробовать?
Я пробовал content-type:text/html;application/x-shockwave-flash

8

Perl / Help по CGI(perl)

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

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