perl如何內嵌html

 　　問：我現在有一個html的網頁代碼，要將其改為perl程序，如果只是單純在其第一行加上"#!../perl/bin/perl",並將文件後綴名改為.cgi，會出現錯誤提示"You don't have permission to access /test/index.cgi on this server."。換句話說:後綴名為.cgi的perl裡如何包含html代碼?

　　答：sub html_html

　　{

　　print "Content-type: text/html ";

　　print <#這裡輸出html

　　eof

　　exit;

　　}

　　問：加了以後果然可以，但裡面的圖片"resource/Top.gif"卻不能顯示，圖片路徑絕對是正確的,如：resource/top.gif

　　答：用相對路徑，最好做一個安裝文件setup.cgi

　　在你的這個文件中：

　　require "setup.cgi";

　　然後這樣調用：lt;img src="$gif/top.gif">

　　setup.cgi文件中有這一行：

　　$gif='http://your url/resource';　#圖片的URL路徑，注意是單引號而不是雙引號。

　　這樣用相對路徑應該可以了。