#!C:/perl/bin/perl.exe

use strict;
use CGI qw(:standard);

print header,start_html,h1('redirecting to a different page');
sleep 5;
print redirect('http://localhost/html/test.html');
print end_html;