CGI.pm：包含圖像？

Question

我正在用模塊CGI.pm寫Perl/CGI腳本。我可以返回文本/ html，但不能在其中包含圖像，它始終顯示'alt'標記，我確信href鏈接。

這裏是我的代碼：

#!/usr/bin/perl -w 
use strict; 
use CGI; 

my $cgi = new CGI; 

print $cgi->header(-type=>'text/html'), 
     $cgi->start_html(-title=>'Test Page'), 
     $cgi->h1('Infos switch'), 
     "This is a test.", 
     $cgi->h1('Testing'), $cgi->hr, "\n", 
     $cgi->img(-src=>'http://www.perl.org/simages/lcamel.gif', 
       -alt=>'Powered by Perl'), "\n\n", 
     $cgi->end_html; 
exit; 

Answer 1

首先，你沒有得到的替代文字。你發送<img>-src http://www.perl.org/simages/lcamel.gif -alt Powered by Perl，所以圖像甚至沒有ALT文本。

img的第一個參數應該是屬性的散列。其餘部分被視爲子元素。

$cgi->img({ 
    -src => 'http://www.perl.org/simages/lcamel.gif', 
    -alt => 'Powered by Perl', 
}) 

破折號是可選的，所以你也可以使用

$cgi->img({ 
    src => 'http://www.perl.org/simages/lcamel.gif', 
    alt => 'Powered by Perl', 
})