CGI - ヘッダーを出力する

#!/usr/bin/perl

use CGI;

my $cgi = new CGI;
print $cgi->header(
-type => 'text/html',
-charset => 'EUC-JP',
-cookie => $cookie,
-status => 200
);

print $cgi->redirect('https://www.ksknet.net');