sub redirect {

    my $new_url = shift;
    my $include_old_url = shift;

    my $redirect = q{http://} . const('host') . $new_url;
    $redirect .= q{?} if $redirect !~ /\?/;
    $redirect .= q{&redirect=} . escape(url()) if $include_old_url;

    my $request = Apache->request();
    $request->internal_redirect($redirect);
    CGI::initialize_globals();

    return;

}