Note that Mechanize now has a success() method so you don't have to capture the response from get().

$agent->get( $url );
$agent->success or die "Couldn't get $url: ", $agent->res->status_line
+;
[download]

xoxo,
Andy