Re: Best way to parse CGI params

Friar II - Son of Friar

Why iterate?

my %vars = $cgi->Vars();
[download]

This page is intentionally left justified.

Comment on Re: Best way to parse CGI params Download Code

Replies are listed 'Best First'.
Re: Re: Best way to parse CGI params by rob_au (Abbot) on Feb 15, 2002 at 11:43 UTC
You know, that strangely looks like the saint way of doing things :-) Although, if you really want to talk uber-demi-God way of doing things, look into the source of CGI.pm and look at the way Lincoln D. Stein has implemented the backward-compatible (with Steve Brenner's `cgi-lib.pl`) method of `Vars` with surprisingly little code ... `sub Vars { my $q = shift; my %in; tie(%in,CGI,$q); return %in if wantarray; return \%in; }` [download] `perl -e 's&&rob@cowsnet.com.au&&&split/[@.]/&&s&.com.&_&&&print'`	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re: Re: Best way to parse CGI params
by rob_au (Abbot) on Feb 15, 2002 at 11:43 UTC

Although, if you really want to talk uber-demi-God way of doing things, look into the source of CGI.pm and look at the way Lincoln D. Stein has implemented the backward-compatible (with Steve Brenner's cgi-lib.pl) method of Vars with surprisingly little code ...

sub Vars {
    my $q = shift;
    my %in;
    tie(%in,CGI,$q);
    return %in if wantarray;
    return \%in;
}
[download]

perl -e 's&&rob@cowsnet.com.au&&&split/[@.]/&&s&.com.&_&&&print'

[reply]
[d/l]
[select]