use CGI; 
my $q = CGI->new(); 
print $q->redirect(
   -location => 'http://cyclesimplex.com/mountain-road-bike-racks.asp',   
   -status => 301, 
);