VPF::без print не работает... - Форум программистов

Luck_brt

Дата 8.11.2007, 08:26 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 18
Регистрация: 19.2.2007

Репутация: нет
Всего: нет

Добрый день, извените что такие легкие вопросы задаю. Но мне больше некуда обратиться за помощью. Изучая. В мануалах должно работать. Смотрел нет ничего похожего пришлось создать тему. Вот! Вот это не работает.

Код


#!"C:\Perl\bin\perl.exe" -wT

print <<END_PAGE;
print Content-Type: text/html


<HTML>                    
<HEAD>
<TITLE>About this server</TITLE>
</HEAD>
<BODY BGCOLOR=#FFFFFF>
<H1>About this server</H1>
<IMG SRC="/image/apache_pb.gif" ALT="APACHE IMAGE"!>
<HR>
<PRE>
Server name: $ENV{SERVER_NAME}
Listing port: $ENV{SERVER_PORT}
Server software: $ENV{SERVER_SOWTWARE}
Server protocol: $ENV{SERVER_PROTOCOL}
CGI version: $ENV{GATEWAY_INTERDACE}
</PRE>
<HR>
</BODY>
</HTML>
END_PAGE

Почему ? что не так ? вроде все наместе, даже и с запятой после Content-type: text/html; и местами я их менял и как только не мучался. Не хочет без print.

А вот если подключть модуль CGI использовать strict и все переписать вставляя перед каждой строчкой print все работает, почему ?
Читал другой мануал у и там примеры идентичны.

amg

Дата 8.11.2007, 08:49 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1145
Регистрация: 3.8.2006
Где: Новосибирск

Репутация: 1
Всего: 50

Во-первых, у тебя последняя строка (там, где терминальный END_PAGE) заканчивается пробелом. Этого пробела (и ничего другого после терминатора, и перед ним тоже) не должно быть! Во-вторых, замени "print Content-Type: text/html" на "Content-Type: text/html".

Это сообщение отредактировал(а) amg - 8.11.2007, 08:50

Luck_brt

Дата 8.11.2007, 09:16 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 18
Регистрация: 19.2.2007

Репутация: нет
Всего: нет

Поменял, убрал пробел. Не помогла...

amg

Дата 8.11.2007, 10:31 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1145
Регистрация: 3.8.2006
Где: Новосибирск

Репутация: 1
Всего: 50

Может, лишнюю пустую строку убрать? Нужно же "Content-Type: text/html\n\n", а у тебя "Content-Type: text/html\n\n\n"

Luck_brt

Дата 8.11.2007, 11:03 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 18
Регистрация: 19.2.2007

Репутация: нет
Всего: нет

ну думаю лишняя строка в редакторе тут не причем главно я не писал Content-type :text/html\n\n\n
Но насякий случай все таки убрал ее. Результат не работает.
Вот код который хочу запустить , убрал все илшнее. Причину так и не могу найти.

Код


#!"C:\Perl\bin\perl.exe" -wT

print <<END_PAGE;
Content-type: text/html

<HTML>                    
<HEAD>
<TITLE>About this server</TITLE>
</HEAD>
<BODY>
<H1>About this server</H1>
<HR>
<PRE>
Server name: $ENV{SERVER_NAME}
Listing port: $ENV{SERVER_PORT}
Server software: $ENV{SERVER_SOWTWARE}
Server protocol: $ENV{SERVER_PROTOCOL}
CGI version: $ENV{GATEWAY_INTERDACE}
</PRE>
<HR>
</BODY>
</HTML>
END_PAGE

amg

Дата 8.11.2007, 11:59 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1145
Регистрация: 3.8.2006
Где: Новосибирск

Репутация: 1
Всего: 50

Цитата(Luck_brt @ 8.11.2007, 11:03

)

ну думаю лишняя строка в редакторе тут не причем главно я не писал Content-type :text/html\n\n\n

Может, лишняя строка не вредит html, но пустая строка внутри кавычек - это "\n"

Код


"Content-type :text/html\n\n\n"

Код


"Content-type :text/html


"

одно и то же.

Есть еще предположение. Под виндой почему то не принято заканчивать файл символом конца строки. А между тем после терминатора должен быть этот символ (и только он). Попробуй ввести Enter в конце файла (если его там не было).

Это сообщение отредактировал(а) amg - 8.11.2007, 12:01

Luck_brt

Дата 8.11.2007, 12:36 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 18
Регистрация: 19.2.2007

Репутация: нет
Всего: нет

Да вы безусловно были правы!!! Нажал на ENTER и все заработало. Да книга под UNIX. Поэтому и не уточнялся такая мелочь из-за чего может не работать весь скрипт. Вот где бы я еще это узнал!? Еще раз спасибо форуму vingrad и конечно вам amg.

amg

Дата 8.11.2007, 13:05 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1145
Регистрация: 3.8.2006
Где: Новосибирск

Репутация: 1
Всего: 50

Цитата(Luck_brt @ 8.11.2007, 12:36

)

Вот где бы я еще это узнал!?

Во многих редакторах есть такая настройка - при сохранении автоматически добавлять в конец файла конец строки, если последний отсутстствует.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: разработка для Web \| Следующая тема »