🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: pl.comp.lang.perl
6 messages
6 total messages Started by Tomasz Mierzejewski Fri, 29 May 1998 12:56
zmienne systemowe i wywolanie programu
#1500
Author: Tomasz Mierzejewski
Date: Fri, 29 May 1998 12:56
14 lines
1004 bytes
mam taki skrypt w shelu:

#!/bin/sh

    QUERY_STRING="parametr"
    export QUERY_STRING
    skrypt.cgi


musze zrobic cos takiego w perlu z tym, ze dodatkowo musze przechwycic do
zmiennej to co zwraca program.cgi.
prosze bardzo o pomoc. stanalem w tym miejscu na amen

Mider
Re: zmienne systemowe i wywolanie programu
#1501
Author: Piotr Piatkowski
Date: Fri, 29 May 1998 13:42
22 lines
1216 bytes
Tomasz Mierzejewski <mider@cavern.com.pl> wrote:
: mam taki skrypt w shelu:

: #!/bin/sh

:     QUERY_STRING="parametr"
:     export QUERY_STRING
:     skrypt.cgi


: musze zrobic cos takiego w perlu z tym, ze dodatkowo musze przechwycic do
: zmiennej to co zwraca program.cgi.
: prosze bardzo o pomoc. stanalem w tym miejscu na amen

#!/usr/bin/perl
$ENV{QUERY_STRING}="parametr";
$out = `skrypt.cgi`;

...ale zupełnie nie widzę sensu po co to robić. Zwłaszcza w perlu.

-- 
Piotr PiÄ…tkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND
Re: zmienne systemowe i wywolanie programu
#1502
Author: Tomasz Mierzejewski
Date: Fri, 29 May 1998 14:50
17 lines
1320 bytes
Dziekuje za odpowiedz.
Powod jest prosty. Ktos napisal calkiem spory kawal programu w C. Ja nie mam
ochoty na analize tego programu i na jego modyfikacje. Chce wiec wykorzystac
ten program, ale dane zwracane przez ten skrypt sa dla mnie nie
wystarczajace, musze je jeszcze przetworzyc.
Jakie jest wiec inne rozwiazanie problemu ???

Mider

>#!/usr/bin/perl
>$ENV{QUERY_STRING}="parametr";
>$out = `skrypt.cgi`;
>
>...ale zupełnie nie widzę sensu po co to robić. Zwłaszcza w perlu.
>
>--
>Piotr PiÄ…tkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND
Re: zmienne systemowe i wywolanie programu
#1504
Author: Tomasz Mierzejewski
Date: Fri, 29 May 1998 15:03
17 lines
1101 bytes
Troche nie wydal ten przyklad :( ale za to podsunal mi inny pomysl.
Zmieszalem to co mi podeslales z tym co robilem poprzednio i powstalo cos
takiego:

$ENV{QUERY_STRING}="parametry";
open (FILE, "./skrypt.cgi|") || die;
@out = <FILE>;
close(FILE);

i to dziala. Ah jak milo.

Mider


>#!/usr/bin/perl
>$ENV{QUERY_STRING}="parametr";
>$out = `skrypt.cgi`;
Re: zmienne systemowe i wywolanie programu
#1503
Author: Piotr Piatkowski
Date: Fri, 29 May 1998 15:07
13 lines
1271 bytes
Tomasz Mierzejewski <mider@cavern.com.pl> wrote:
: Dziekuje za odpowiedz.
: Powod jest prosty. Ktos napisal calkiem spory kawal programu w C. Ja nie mam
: ochoty na analize tego programu i na jego modyfikacje. Chce wiec wykorzystac
: ten program, ale dane zwracane przez ten skrypt sa dla mnie nie
: wystarczajace, musze je jeszcze przetworzyc.
: Jakie jest wiec inne rozwiazanie problemu ???

No tak... Chyba to ma sens co piszesz - znaczy wydaje mi siÄ™ to 
jedynym sposobem.

-- 
Piotr PiÄ…tkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND
Re: zmienne systemowe i wywolanie programu
#1505
Author: Piotr Piatkowski
Date: Fri, 29 May 1998 15:09
18 lines
1275 bytes
Tomasz Mierzejewski <mider@cavern.com.pl> wrote:
: Troche nie wydal ten przyklad :( ale za to podsunal mi inny pomysl.
: Zmieszalem to co mi podeslales z tym co robilem poprzednio i powstalo cos
: takiego:

: $ENV{QUERY_STRING}="parametry";
: open (FILE, "./skrypt.cgi|") || die;
: @out = <FILE>;
: close(FILE);

: i to dziala. Ah jak milo.

Tak, ale po co zamieniać jedną linijkę trzema? A jak chcesz mieć 
tablicę, to możesz zrobić:
@out = split /\n/, `./skrypt.cgi`;

-- 
Piotr PiÄ…tkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads