while (my ($k, $v) = each %args) {
dbg("AsyncMsg: attaching header $k: $v") if isdbg('async');
$tx->req->headers->header($k => $v);
while (my ($k, $v) = each %args) {
dbg("AsyncMsg: attaching header $k: $v") if isdbg('async');
$tx->req->headers->header($k => $v);