|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Vitaly Belashov 2:5020/400 14 Apr 2000 10:01:51
To : All
Subject : Hаверное в чайник мне :(
--------------------------------------------------------------------------------
Hi ALL!
Hедавно начал копаться в PERLe.
Сразу поясню - PERL скрипт будет выполняться на WWW сервере.
Результат работы - HTML страничка.
Есть несколько вопросов.
1
Как избавиться от возврата коретки (код символы 13)?
Создаю файл NotePadом, все строки заканчиваются 13 и 10.
Читаю их в программу, естественно 13 остается.
Как избавиться от этого?
Редактор посоветуйте, что-ль. Может лучьше что можно придумать?
2.
Как правильно в тело результата (HTML страничка) вывести какойто файл.
Я делаю так.
sub putfile
{
open (FILE, "$_[0]");
@LINES=<FILE>;
close (FILE);
$SIZE=@LINES;
for ($i = 0; $i <= $SIZE; $i++)
{
print "$LINES[$i]"
}
exit;
}
Hаверное можно проще.
3.
Как правильно в тело результата (HTML страничка) вывести результат
работы другог скрипта.
В SSI я просто писал <!--#include file="cgi-bin/mycgi.cgi" -->
Спасибо!
Виталий.
--- ifmail v.2.15dev4
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
