請填寫以下問卷


職業         
年齡         
性別          女
電子郵件地址 
建議         

Perl 的原始程式

require("cgi-lib.pl");

&ReadParse;

print "Content-type: text/html\n\n";
print "<title>CGI Perl</title>\n";
print "<h1>謝謝您的登錄以下資料</h1>\n";
print "<hr><pre>\n";
print "職業:     $in{'job'}\n";
print "年齡:     $in{'age'}\n";
print "性別:     $in{'sex'}\n";
print "電子信箱: $in{'email'}\n";
print "建議:     $in{'comments'}\n";
print "</pre><hr>\n";