#!/usr/bin/perl -Tw

use strict;
use CGI qw(redirect);

print redirect('http://localhost/redirected.html');