什么都没有，帮帮忙吧（CGI)

什么都没有，帮帮忙吧（CGI)
想用 CGI Pretty 生成 一网页。
结果网页的字节为零，什么都没有，请帮我，代吗如下

[code]
#!C:/Perl/bin/perl

use strict;
use CGI::Pretty qw( -debug );
use CGI::Carp qw( fatalsToBrowser );

my $q = new CGI;

my $pay = $q->param(payment=>"discover","master","check");
my $pay_text;

if ( $pay eq "discover" ) {
$pay_text = "Discover Card";
}
elsif ( $pay eq "discover" ) {
$pay_text = "Master Card";
}
elsif ( $pay eq "check" ) {
$pay_text = "by check";
}
else {
$pay_text = "unknown method";
}

print $q->header,

$q->start_html( -title=>"Welcome",
-bgcolor=>"pink"),

$q->p( "Your name is ",
$q->b("name")),

$q->p( { -style=>{yext-decortation:underline},
"Your age is ",
$q->textfield(-name=>"age")),

$q->p( "Your method of payment is ",
$q->span($pay_text),-style=>{color=>"blue"})
$q->end_html;
[/code]