$r->headers_out->set(Location => $location);
$r->status(Apache2::Const::REDIRECT);
return Apache2::Const::REDIRECT;