$condvar->lock();
http_get "http://blah", sub { $condvar->unlock();
     print $_[1] };