foreach(@threads) {
     my($status, $header, $body, $time) = $_->join();
     ...
}