perl - 简单的 CGI/Perl 脚本不显示背景图像

Question

#!/usr/local/bin/perl
use warnings;
use strict;

use CGI qw(:standard);
print header;
print start_html(-title=>"Hello World", 
-bgcolor=>"#cccccc", -text=>"#999999",
-background=>"healo.jpg");

颜色显示，但不显示图像。我有 healo.jpg 位于 bin 文件夹和我的主文件夹中。我从http://www.cgi101.com/book/ch1/text.html 获取此代码 请帮助。

Answer 1

如果您的 CGI 脚本是标准cgi-bin的，则该文件healo.jpg不能存储在那里，因为它不是 CGI 脚本。试着把它放在别的地方。

例如，您可以将图像文件放在您的 wwwroot 中，这样您就可以在http://csvlife.com/healo.jpg找到它（那里已经有一些东西了），然后将那部分代码更改为-background=>"/healo.jpg".

Answer 2

检查您生成的 HTML。这将生成表单的背景属性：

background = 'healo.jpg'

这意味着 healo.jpg 需要与您当前所在的目录位于同一目录中，这可能与您的主文件夹不同。

您要么需要将图像复制到 webroot（您可能不能这样做），要么将参数更改为start_html绝对路径，例如background ='/healo.jpg'