2016-01-30 110 views
-6

我打算從這個頁面加載一個Java小程序。我可以稍後添加代碼和其他任何必需的頁面,但出於某種原因,我無法加載此頁面。我認爲這是<div>標籤。任何人都可以向我解釋?CGI頁面不會加載

!/usr/bin/perl 

require "/home/bob/public_html/cgi-bin/cookie.pl"; 

print "Content-type: text/html\n"; 

# Make sure the passed date is reasonable 
$theTime = $ENV{'QUERY_STRING'}; 
$theTime = time - $theTime; 

&Do_Cookies(); 

print "\n"; 
print "\n"; 

print "<html><head><title>Title</title><link rel=\"stylesheet\"type=\"text/css\" href=\"stylesheet.css\"></head><body>"; 
print "<div id=\"header\"></div>"; 
print "<div class=\"content\"><p>CENTER STUFF</p></div>"; 
print "<div id=\"copy\"><center>Copyright Notice HERE</center><br></div></center>"; 
print "<div id=\"navLeft\">LEFT STUFF</div>"; 
print "<div id=\"navRight\">RIGHT STUFF</div></body></html>"; 

exit 0; 
+4

Java applet? CGI Perl?不知怎的,我被運回了1999年? –

+3

好吧,看,「它不工作」不是一個好問題的陳述。你看到了什麼?錯誤日誌說什麼?當你從命令行運行時會發生什麼?第一件事情就是跳到我身上 - 還有很多---就是你的生日線。從那裏開始。 –

+1

這是一個非常老式的Perl,從.pl文件的require需要調用具有&符號的子程序。你也可以省略'use strict'和'use warnings'all''並且不聲明你的變量。至少在十四年前Perl 5的第8版出現時,這並不是很好的風格。如果你打算使用CGI,你至少應該在你的代碼 – Borodin

回答

0

我不知道您的意思是「我無法加載此頁面」。你究竟發現了什麼意外的行爲?你在瀏覽器中看到什麼?如果你「查看源代碼」呢? Web服務器錯誤日誌中是否有用?

您的CGI代碼看起來像是上個千年的事情。看看現代Perl Web開發技術,這將是非常值得的。

很難測試你的代碼,因爲它包含一個「cookie.pl」文件,我不知道它包含了什麼。我假設它包含Do_Cookies()子例程。但是,如果我評論這一點並修復shebang線,那麼我會得到一些看起來非常有用的東西。有基本的HTML錯誤(您關閉<center>元素兩次),但沒有任何東西會阻止這個工作。

沒有關於您的問題的更多信息,很難再有任何幫助。