Select Code to Download

$SIG{HUP} = sub { $__server_should_run = 0; };

$__server_should_run = 1;
...

        # handle request
}