perl如何內嵌html

近日在CSDN的CGI版看到有centuries (燃燒太陽)網友問如何在Perl中內嵌HTML，這是在Perl WEB開發中經常遇到的一個問題，現在寫出來，希望對大家有所幫助。 問

我現在有一個html的網頁代碼，要將其改為perl程序，如果只是單純在其第一行加上"#!../perl/bin/perl",并將文件后綴名改為.cgi，會出現錯誤提示"You don't have permission to aclearcase/" target="_blank" >ccess /test/index.cgi on this server."。換句話說:后綴名為.cgi的perl里如何包含html代碼？謝謝。

答sub html_html
{
print "Content-type: text/html\n\n";
print <<eof;
#這里輸出html
eof
exit;
}問謝謝ceocio。
加了以后果然可以，但里面的圖片"resource/Top.gif"卻不能顯示，圖片路徑絕對是正確的,如：resource/top.gif答

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

在你的這個文件中：
require "setup.cgi";

然后這樣調用：
<img src="attachment/070621/7a76a3d331.gif">

setup.cgi文件中有這一行：
$gif='http://your url/resource';  #圖片的URL路徑，注意是單引號而不是雙引號。

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

原文轉自：http://www.kjueaiud.com