CGI中心圖像

Question

我有一段時間讓這個圖像居中。任何幫助，將不勝感激。在http://www.quickpaysolutions.com/ttb.html

#!/usr/bin/perl 

use CGI qw(:standard); 
use CGI::Carp qw(warningsToBrowser fatalsToBrowser); 
use strict; 
use CGI; 

my $cgi = new CGI; 

print 

    $cgi->header() . 

    img {src => "../cgi-bin/images/mtlogos.png", align=>"CENTER"}; 

$cgi->start_html(-title => 'Form Results') . 

$cgi->center($cgi->h1('Reciept <br> Please Print this Reciept')). "\n"; 

my @params = $cgi->param(); 
print '<table border="1" width="600" align="center" cellspacing="1"    cellpadding="2">' . "\n"; 
foreach my $p (param()) { 
    print "<tr><th>$p</th><td>" . $cgi->param($p) . "</td></tr>\n"; 
} 
print "</table>\n"; 

Answer 1

在CSS中，

測試形式在塊中心的項目，設置其左右邊距到auto：使用CGI.pm

print Tr(
     th(
      { -style=>'margin-left: auto; margin-right: auto;' }, 
      $p 
      ) 
     ); 

margin-left: auto; 
margin-right: auto; 

Answer 2

你的代碼有點奇怪：你打電話給start_html和center，只是扔掉他們生成的文本而不打印它。

img不是塊元素，因此將忽略center的align屬性。

你可以只包裹圖像中的center元素：

print $cgi->center($cgi->img({ -src => "../cgi-bin/images/mtlogos.png" })); 

或者你可以使用一個封閉元素的align屬性像div：

$cgi->div({ -align => 'center' }, $cgi->img({ -src => "../cgi-bin/images/mtlogos.png" })); 

但是你要注意的是， center標記和align屬性已棄用，唯一正確的方法是使用CSS