Mojo::Client might be helpful.
use Mojo::Client;
use Mojo::Transaction;
my $client = Mojo::Client->new;
my $tx = Mojo::Transaction->new_get('http://labs.kraih.com');
my $tx2 = Mojo::Transaction->new_get('http://mojolicious.org');
$tx2->req->headers->expect('100-continue');
$tx2->req->body('foo bar baz');
$client->process_all($tx, $tx2);
print $tx->res->code;
print $tx2->res->code;
print $tx2->res->content->file->slurp;
AnyEvent::Mojo::Client is in the works too but not yet ready for prime time i think.