$new_daemon = $daemon->accept(); my $r = $new_daemon->get_request; my $request = $r->url->epath; #### my $line = (); $line =~ m#GET http://(.*)/(.*)#;