use Apache2::Const -compile => qw(:common :http);

##</code><code>##

sub decline {
   # print some stuff
   Apache2::Const::OK;
}

##</code><code>##

$r->headers_out->add('Location' => "/main");
$r->content_type('text/html');
return Apache2::Const::REDIRECT;