print $q->redirect(-url => "http://redirected_url");