in reply to Re^6: Testing scripts
in thread Testing scripts

Guess this would be my transition from beginer to learner. lol
Actually have all my scripts so far working now.
Thanks for your input there, but can I ask another question?
On these tutorial scripts we have been given a nice little script for organising the name/value pairs into an associative array, ie
sub ReadParse { local (*in)=@_if @_; local ($i, $loc, $key, $val); #Read in text if($ENV{'REQUEST_METHOD'}eq"GET"){ $in = $ENV{'QUERY_STRING'}; }elsif ($ENV{'REQUEST_METHOD'}eq "POST"){ read(STDIN,$in, $ENV{'CONTENT_LENGHT'}); } @in = split(/&/.$in); foreach $i (0..$#in){ #Convert pluses to spaces $in[$i]=~s/\+//g; #Split in to key and value. ($key, $val)= split(/=/,$in[$i],2);#splits in the first= #Convert%XX from hex numbers to alphanumeric $key=~s/%(..)/pack("c",hex($1))/ge; $val=~s/%(..)/pack("c",hex($1))/ge; #Associate key and value $in{$key}.="\0"if (defined($in{$key})); #\0 is the mulitple separa +tor $in{$key}.=$val; } return 1;#just for fun }
I just need to now how it fits in between the html forms and the cgi scripts.
Does the html form reference this and inturn this references the cgi programme?

Replies are listed 'Best First'.
Re^8: Testing scripts
by Corion (Patriarch) on Feb 14, 2010 at 14:08 UTC

    In short, throw away the whole routine and just use CGI instead. It will be a good, tested routine to deparse a query string into its parameters and it can even return you a hash (what your instructors seem to be calling an "associative array", which is a term used by those raised in Perl4, or awk+sed) should you want so.