Re^2: How a web server sending data to a CGI perl script ?

Replies are listed 'Best First'.
Re^3: How a web server sending data to a CGI perl script ? by flexvault (Monsignor) on Jan 25, 2016 at 16:03 UTC
Hello exilepanda, If you do it the way I described, the %ENV variables are already set-up for you. Do not touch the %ENV, but copy the %ENV to a temp hash. And remember you still need the GET / POST data ( the actual $Todo work ) from the WebServer. ( Example ). `my $Todo = ...; # Data sent via GET or POST from browser via We +bServer my $environment = ''; foreach my $env ( keys %ENV ) { $environment .= "$env\t$ENV{$env}\n"; } my $send = pack("N",length($environment) ) . $environment . pack( +"N",length($Todo) ) . $Todo; my $ret = send_data( $svr, \$send ); # Send to processing Perl s +cript` [download] Now the second client has the environment of the WebSever, and it's own %ENV from Perl. The processing client uses %TempENV for WebServer info and it's own %ENV if it needs it. It's clean and you don't have to get into the error handling of the WebServer. Good Luck! Regards...Ed "Well done is better than well said." - Benjamin Franklin	[reply] [d/l]
Re^3: How a web server sending data to a CGI perl script ? by Anonymous Monk on Jan 25, 2016 at 07:26 UTC
`$ cat shabba for my $key ( grep /perl/i , keys %ENV ){ print qq{ $key $ENV{$key}\n} +; } $ perl shabba PERL_MB_OPT --config installhtmldir= --binhtml= $ perl -e " $ENV{PERL_SHABBA}=666; system $^X, q{shabba}; " PERL_SHABBA 666 PERL_MB_OPT --config installhtmldir= --binhtml= --config installht +mldir= --binhtml= $ perl shabba PERL_MB_OPT --config installhtmldir= --binhtml=` [download]	[reply] [d/l]
Re^4: How a web server sending data to a CGI perl script ? by exilepanda (Friar) on Jan 26, 2016 at 17:00 UTC
Oh Wow!! Surprised!!! Great demonstration and works perfectly! And I just notice the `system()` or the backticks ( the right tool for my case ) are actually kind of fork thing... which is the "how" that I exactly asking! Thanks man! Though.. what still puzzle me is how do you leave the `<STDIN>` open for the CGI to `read()` in this code pattern ?	[reply] [d/l] [select]
Re^5: How a web server sending data to a CGI perl script ? by Anonymous Monk on Jan 27, 2016 at 08:50 UTC
Its not a pattern, just shows %ENV is inherited from parent process Its one part of what HTTP::Request::AsCGI does, STDIN... stuff is the other part	[reply]