Hi,

        Or...

#!/usr/bin/perl

Use CGI;

$q = new CGI;

if ( $q->param_url("var") )
{
        Print $q->param_url("var")
}

Really, if you look at a lot of functions in PHP and Perl, they mimic each
other, and other languages (C, etc..)..  It's a personal preference choice.
PHP was designed for dynamic web pages, Perl was designed to be a unix
programming language that evolved.

-Dan Joseph

> #!/usr/bin/perl
> 
> print "HTTP/1.0 200\r\n";
> print "Content-Type: text/html\r\n";
> print "Set-Cookie: SESS=123fdfd...\r\n"
> print "Connection: close\r\n";
> print "Cache-Control: no-store..\r\n";
> print "Pragma: no-cache \r\n";
> print "Content-Type: text/html; charset=ISO-8859-1\r\n";
> print "\r\n";
> 
> $qs = $ENV{'QUERY_STRING'};
> #
> # bunch of tr/,s/,maping code to figure out a query string vars
> # into $_GET
> #
> if ($_GET{'var'} ) {
>   print $_GET{'var'};
> }
> 
> #!/usr/bin/php
> <?php
> if ($_GET['var']) {
>   echo $_GET['var'];
> }
> 
> 
> Curt
> --
> First, let me assure you that this is not one of those shady pyramid
> schemes
> you've been hearing about.  No, sir.  Our model is the trapezoid!
> 
> --
> PHP General Mailing List (http://www.php.net/)
> To unsubscribe, visit: http://www.php.net/unsub.php

-- 
PHP General Mailing List (http://www.php.net/)
To unsubscribe, visit: http://www.php.net/unsub.php

Reply via email to