Ohhh.. I'm sorry Monks... it was my broken /dev/hands :(

My FastCGI architecture was wrong!

This is true architecture:

#!/usr/bin/perl

BEGIN {
   $ENV{FCGI_SOCKET_PATH} = "127.0.0.1:9090";
   $ENV{FCGI_LISTEN_QUEUE} = 5;
}
use CGI::Fast;
use FCGI::ProcManager;
my $proc_manager = FCGI::ProcManager->new({ n_processes => 1 });
$proc_manager->pm_manage();
my $count = 0;
while(my $query = CGI::Fast->new()) {
    $proc_manager->pm_pre_dispatch(); 
    $count++;
    print <<TEXT;
Content-Type: text/html

<h1>hello</h1>
$count
<hr>
TEXT
    print "$_ = $ENV{$_}<br>\n" foreach sort keys %ENV;
    print "<hr>\n";
    print "$_ = ", $query->param($_), "<br>\n" foreach sort $query->pa
+ram();
    $proc_manager->pm_post_dispatch(); 
}
[download]

Thread closed!