Use Ian Jackson's `cgi-fcgi-interp' wrapper to make it happen.
-#! /usr/bin/perl
+#! /usr/bin/cgi-fcgi-interp /usr/bin/perl
+### -*-perl-*-
###
### IP-address reporting webservice for Odin
###
use lib 'lib';
use Odin;
+use CGI::Fast;
-print <<EOF;
+while (my $cgi = CGI::Fast->new) {
+ my $addr = $cgi->remote_addr;
+ print <<EOF;
Content-type: text/plain; charset=us-ascii
X-AGPL-Source: $Odin::SRCURL
-$ENV{REMOTE_ADDR}
+$addr
EOF
-exit 0;
+}