print "Location: http://blah.com\n\n"; 


##</code><code>##

 
use CGI qw(:standard); 
my $query = CGI -> new(); 

$query -> redirect(-uri => 'http://blah.com'); 


##</code><code>##

 
use CGI qw(:standard); my $query = CGI -> new(); $query -> redirect(-uri => 'http://blah.com', nph => 1);