C# と VB.NET の質問掲示板

Apache 2.2.22
ActivPerl 5.14.2.1402
でCGIを作っています。
index.htmlで送信ボタンを押してsmtp.plでindex.htmlに入力した内容をメールで送信します。ここまではできるのですが
メール送信後にthankyou.swfというFLASHアニメを表示するarigatou.htmlを表示したいのですがうまくいきません。

Content-type: text/html

お問い合わせありがとうございました。
というsmtp.plの最後の部分が表示されるだけです。

homePage(フォルダー)
	|----index.html
	|----arigatou.html
	|---FLASH(フォルダー)
	|	|-------thankyou.swf
	|---cgi-bin(フォルダー)
		|-------smtp.pl

のようにフォルダーとファイルがあります。
smtp.pl　の内容は

#!/Perl/bin/perl
print "Content-type: text/plain\n\n";
use CGI;
$q = new CGI;
変数代入
use     Socket;
$server = 'xxx.ne.jp' ;
$to = 'yyyy@hhh.co.jp' ;
$from = 'DDDDD.jp.net' ;
$subject = 'サンプルメール' ;
$data = $BUN;
require './jcode.pl';


 # ------------------------------------------------------- #
 # ヘッダ、データ部の作成
# ------------------------------------------------------- #

 # ------------------------------------------------------- #
 # SOCKETの作成
# ------------------------------------------------------- #

 # ------------------------------------------------------- #
 # コマンドの送信
# ------------------------------------------------------- #

 # -------- HELOコマンドの送信とレスポンスの確認 --------- #

 # -------- MAILコマンドの送信とレスポンスの確認 --------- #

 # -------- RCPTコマンドの送信とレスポンスの確認 --------- #

 # -------- DATAコマンドの送信とレスポンスの確認 --------- #

 # -------- ヘッダ、本文の送信とレスポンスの確認 --------- #

 # --------QUITコマンドの送信 -------- #

 # --------切断 -------- #

     close(SH); select(STDOUT);

     print "MAILは正常に送信されました。\nお問い合わせありがとうございました。\n";

 # --------------------
 # 改行コード変換
# --------------------
sub decode{
     
     my $inf = $_[0];
     $$inf =~ s/\x0D\x0A|\x0D|\x0A/\n/g;

 }
となっています。
切断のところをどのように書けばarigatou.htmlへ飛べるでしょう？

#!/Perl/bin/perl
print "Location: http://xxx.jp.net/arigatou.html\n\n";
exit;
単体ではうまくいきますが
 # --------切断 -------- #

     close(SH); select(STDOUT);

     print "MAILは正常に送信されました。\nお問い合わせありがとうございました。\n";
     print "Location: http://xxx.jp.net/arigatou.html\n\n";
では動きません。　よろしくお願いいたします。