To reproduce the problem, you can run the Perl script attached at the
end of this post [...]

Sorry, forgot to attach the script. Here goes:

use strict;
use LWP::UserAgent;

my $ua = LWP::UserAgent-new();

my $n=1;
while (1) {
print "Fetching page $n...";

my $req = HTTP::Request-new(GET = "http://127.0.0.1/test.htm");
$req-header('Accept' = 'text/html');

# Send request.
my $res = $ua-request($req);

# Check the outcome.
if ($res-is_success) {
print " OK!\n";
$n++;
}
else {
print " ERROR: " . $res-status_line . ".\n";
sleep 1; # Don't flood the console.
}

$req=undef;
}