Select Code to Download

        my $webflags = 0;    
        fcntl(STDIN, F_GETFL, $webflags)
...
        $webflags |= O_NONBLOCK;
        fcntl(STDIN, F_SETFL, $webflags)
            or die "Couldn't set flags for HANDLE: $!\n";

                my $data = '';
                my $buf;
...
                    $data .= $buf;
                    $buf = undef;
                }

$server->run(
    [...some other stuff...]
...
    SSL_cert_file=> $config->{server}->{sslcert},
    [...some other stuff...]
);