您好,登錄后才能下訂單哦!
這篇文章將為大家詳細講解有關創建一個簡單Perl CGI的方法,小編覺得挺實用的,因此分享給大家做個參考,希望大家閱讀完這篇文章后可以有所收獲。
CGI腳本可以是簡單的,也可以是復雜的。它可以是Perl、Java、Python或任何編程語言。在其核心,CGI應用程序只是通過HTTP(通常是web瀏覽器)接受請求并返回HTML。讓我們看一個簡單的Perl Hello World CGI腳本,并將其分解為最簡單的表單。
'Hello World'CGI Perl腳本
#!/usr/bin/perl print "Content-type: text/html\n\n"; print <<HTML; <html> <head> <title>A Simple Perl CGI</title> </head> <body> <h2>A Simple Perl CGI</h2> <p>Hello World</p> </body> HTML exit;
如果您在命令行上運行該程序,您將看到它所做的正是您所期望的。首先,它打印內容類型行,然后打印原始HTML。為了在web瀏覽器中看到它的運行情況,您需要將腳本復制或上載到web服務器,并確保權限設置正確(*nix systems上的chmod 755)。一旦設置正確,您應該能夠瀏覽到它,并在服務器上看到實時顯示的頁面。
關鍵行是第一個print語句:
print "Content-type: text/html\n\n";
這告訴瀏覽器,這兩個換行之后的文檔將是HTML。您必須發送一個標題,以便瀏覽器知道接下來的文檔類型,并且必須在標題和實際文檔之間包含空行。
發送頭之后,只需要發送HTML文檔本身。在上面的例子中,我們使用here-doc來簡化打印一大塊純文本。當然,這與服務器上有一個純HTML文檔沒有什么不同。當您添加一些奇特的Perl編程時,使用Perl之類的編程語言來創建HTML的真正威力就來了。
添加到基本腳本中
在下一個示例中,讓我們使用這個時間和日期腳本的一部分,并將其添加到web頁面中。
#!/usr/bin/perl @months = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec); @weekDays = qw(Sun Mon Tue Wed Thu Fri Sat Sun); ($second, $minute, $hour, $dayOfMonth, $month, $yearOffset, $dayOfWeek, $dayOfYear, $daylightSavings) = localtime(); $year = 1900 + $yearOffset; $theTime = "$weekDays[$dayOfWeek] $months[$month] $dayOfMonth, $year"; print "Content-type: text/html\n\n"; print <<HTML; <html> <head> <title>A Simple Perl CGI</title> </head> <body> <h2>A Simple Perl CGI</h2> <p>$theTime</p> </body> HTML exit;
這個新的CGI腳本將在每次調用腳本時將當前日期插入頁面。換句話說,它變成了一個隨著日期變化而變化的動態文檔,而不是靜態文檔。
關于創建一個簡單Perl CGI的方法就分享到這里了,希望以上內容可以對大家有一定的幫助,可以學到更多知識。如果覺得文章不錯,可以把它分享出去讓更多的人看到。
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。