The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
digraph {
graph [overlap=false]
subgraph cluster_LWP_UserAgent {
	label="LWP::UserAgent";
	"LWP::UserAgent::BEGIN@11";
	"LWP::UserAgent::send_request";
	"LWP::UserAgent::request";
}
subgraph cluster_HTTP_Response {
	label="HTTP::Response";
	"HTTP::Response::BEGIN@7";
	"HTTP::Response::new";
	"HTTP::Response::request";
	"HTTP::Response::BEGIN@8";
	"HTTP::Response::code";
	"HTTP::Response::previous";
	"HTTP::Response::is_success";
	"HTTP::Response::redirects";
	"HTTP::Response::message";
}
subgraph cluster_SimpleDB_Client {
	label="SimpleDB::Client";
	"SimpleDB::Client::send_request";
	"SimpleDB::Client::handle_response";
}
subgraph cluster_HTTP_Status {
	label="HTTP::Status";
	"HTTP::Status::is_success";
	"HTTP::Status::CORE:match";
	"HTTP::Status::BEGIN@3";
	"HTTP::Status::BEGIN@6";
}
subgraph cluster_HTTP_Message {
	label="HTTP::Message";
	"HTTP::Message::new";
	"HTTP::Message::_elem";
}
subgraph cluster_strict {
	label="strict";
	"strict::import";
}
subgraph cluster_HTTP_Config {
	label="HTTP::Config";
	"HTTP::Config::matching";
}
subgraph cluster_LWP_Protocol_http {
	label="LWP::Protocol::http";
	"LWP::Protocol::http::request";
}
"HTTP::Response::BEGIN@8" -> "HTTP::Status::BEGIN@3";
"LWP::UserAgent::BEGIN@11" -> "HTTP::Response::BEGIN@7";
"HTTP::Response::request" -> "HTTP::Message::_elem";
"HTTP::Response::code" -> "HTTP::Message::_elem";
"HTTP::Response::previous" -> "HTTP::Message::_elem";
"HTTP::Response::message" -> "HTTP::Message::_elem";
"HTTP::Response::redirects" -> "HTTP::Response::previous";
"LWP::UserAgent::request" -> "HTTP::Response::redirects";
"HTTP::Response::new" -> "HTTP::Response::message";
"HTTP::Response::BEGIN@8" -> "HTTP::Status::CORE:match";
"LWP::UserAgent::send_request" -> "HTTP::Response::request";
"HTTP::Config::matching" -> "HTTP::Response::request";
"LWP::Protocol::http::request" -> "HTTP::Response::request";
"HTTP::Response::new" -> "HTTP::Message::new";
"SimpleDB::Client::handle_response" -> "HTTP::Response::is_success";
"LWP::UserAgent::BEGIN@11" -> "HTTP::Response::BEGIN@8";
"HTTP::Response::BEGIN@8" -> "HTTP::Status::BEGIN@6";
"HTTP::Response::new" -> "HTTP::Response::code";
"SimpleDB::Client::send_request" -> "HTTP::Response::code";
"LWP::UserAgent::request" -> "HTTP::Response::code";
"LWP::Protocol::http::request" -> "HTTP::Response::new";
"HTTP::Response::is_success" -> "HTTP::Status::is_success";
"HTTP::Response::BEGIN@7" -> "strict::import";
}