# client.pl

use strict;
use warnings;

my $input = <STDIN>;

print <<END

This is a pseudo-CGI client reporting.
Process number $$
Got input "$input"
\$ENV{foo} is "$ENV{foo}"
\$ENV{baz} is "$ENV{baz}"
End of report

END