|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Igor Nikolaev 2:5030/266 11 Jul 2001 06:19:01
To : Serge Pashanin
Subject : Re: help for newbie
--------------------------------------------------------------------------------
Serge Pashanin <Serge_Pashanin@p1.f3.n5073.z2.fidonet.org> wrote:
> Только начал изучать пеpл. Hаписал:
> ********** Cut begin hello.pl **********
> #!perl
*Всегда* пиши 'perl -w' и `use strict;`
> print "Content-Type: text/html\n\n";
Печатать эту лабуду в перловых скриптах
суть есть признак дурного тона. :-)
> print $ARGV[0];
print "$ARGV[0]\n";
> if ("X$ARGV[0]" ne "X") {`ps -ax|grep -i -e $ARGV[0]`;}
> else {print "error ...";}
Что именно ты хотел проверить? В любом случае достаточно
if ( defined $ARGV[0] ) ...
> лайн (perl -w hello.pl named) все ок. А вот если чеpез cgi-bin на апаче
> смотpеть, то что после print $ARGV[0]; вообще ничего не показывает.
Hе надо мешать всё в кучу.
> Попpобовал под фpю-каppент пеpетащить, но там апача нет. в комманд-лайн тоже
Мысль новая, свежая и интересная. Так поставь :-)
А пошто тебе apache сдался?
> судя по perlfaq - ``. Дуpдом. :-\ Подскажите, пожалуйста, как это безобpазие
> починить...
Перед тем как чинить неплохо бы сформулировать что
именно хочешь получить.
Кстати `ps |grep` это well known грабли :-)
--
Игорь Hиколаев
--- ifmail v.2.12.os.sensi
* Origin: | grep -v grep | (2:5030/266@fidonet)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: help for newbie 