#!/usr/bin/ruby
require 'cgi'
require 'fcgi'

def print_env(title,env)
  str = "#{title}:<br>\n<pre>\n";
  env.each { |k,v| str<<"#{k}=#{v}\n" }
  str<< "</pre><p>\n"
end

count = 0

FCGI.each_cgi do |cgi|
  count += 1
  content = "<title>FastCGI echo</title><h1>FastCGI echo</h1>\n"
  content<< sprintf("Request number %d, Process ID: %d<p>\n", count, Process.pid)
  content<< print_env("Request environment", cgi.env_table)
  content<< print_env("Initial environment", ENV)
  cgi.out{content}
end