use CGI;
print CGI->redirect('http://example.com/');