while () {
    my $c = $d->accept or next;
    while ( my $r = $c->get_request ) {
        $c->send_file_response('./index.html');
    }
    $c->close;
    undef($c);
}