12.3 第一支 CGI 程式

#! /usr/bin/perl      
# (第一列用來指出 perl 的路徑)
       
# 這是註解
# (第二列開始,若有出現 # ,則表示該列為註解,
# perl 將不會執行它)
       
print "Content-type:text/html\n\n";
# 這是 MIME 表頭,用來告訴瀏覽器要送出的資料型態是什麼?
# 一定要寫出這一行,否則會出現 Error 500 錯誤
# 注意:每列命令用 ; 做為結束!
       
# 接下來印出欲顯示的網頁內容
print "<html><head><title>CGI 哈囉!</title></head>";
       
print "<body bgcolor='white'>";
       
print "<h1>Hello, world!!</h1>";
       
print "</body></html>";