Article View: pl.comp.lang.perl
Article #1123Re: Zmiana!?
From: Tomasz Mierzejewski
Date: Mon, 16 Mar 1998 13:40
Date: Mon, 16 Mar 1998 13:40
49 lines
2167 bytes
2167 bytes
Waldek Grudzień napisał(a) w wiadomości: ...
On Sun, 15 Mar 1998, Lukasz "Gulash" Wojciechowski wrote:
> czesc wszystkim
> Mam maly problem ze skryptami.
> Tzn.dopiero sie ucze je pisac i natrafilem
> na przeszkode nie do pokonania a mianowicie:
> jak zrobic zeby skrypt pobieral wartosc zmiennej
> nie "z siebie" tylko z zewnatrz np.:
> Mam zmienna w skrypcie
> $zmienna="cos_tam"
> ale chce zeby ta zmienna pobieral ze sciezki
> z jakiej sie ten skrypt wywoluje np.:
> http://www.cos.net/cgi-bin/licznik?gulash
> i w tym wypadku pobiera wartosc zmiennej = gulash
> i jak zrobic zeby to gulash wstawil zamiast cos_tam????
> Ps: Wybaczcie za takie troche dziwne formulowanie mysli
> ale nie wiedzialem jak sie opisac swoj problem inaczej:-D
Radzę użyć modułu CGI,
use CGI;
$query = new CGI;
wtedy rozbieranie parametrów (i nie tylko) jest banalne - przykładowo dla
parametru o nazwie gulash :
$zmienna = $query->param('gulash');
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Oczywiscie zeby to zadzialalo musisz wywolac skrypt w ten spopsob
www.costam.net/cgi-bin/skrypt?gulash=wartosc
wtedy do zmiennej $zmienna zostanie zapisana wartosc "wartosc" :)
proponuje tez przed definicja zmiennych dodawac my (dostepne w PELU 5.0 i
wyzej)
bedzie to wtedy wygladalo tak:
#! /bin/perl
use CGI;
my $query = new CGI;
my $zmienna = $query->param('gulash');
uzywajac CGI unikniesz wielu problemow :)
Mider
Technical Details
Message-ID:
<6ejacb$t7l$1@korweta.task.gda.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!news.icm.edu.pl!news.task.gda.pl!not-for-mailReferences:
<6eh680$e21$1@korweta.task.gda.pl> <Pine.HPP.3.96.980316071406.4507B-100000@clinicom.uhc.lublin.pl>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!news.icm.edu.pl!news.task.gda.pl!not-for-mail From: "Tomasz Mierzejewski" <mider @cavern.com.pl> Newsgroups: pl.comp.lang.perl Subject: Re: Zmiana!? Date: Mon, 16 Mar 1998 14:40:43 +0100 Organization: Cavern Lines: 51 Message-ID: <6ejacb$t7l$1@korweta.task.gda.pl> References: <6eh680$e21$1@korweta.task.gda.pl> <Pine.HPP.3.96.980316071406.4507B-100000@clinicom.uhc.lublin.pl> NNTP-Posting-Host: klementyna.cavern.com.pl X-Newsreader: Microsoft Outlook Express 4.71.1712.3 X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit