file - Perl - 动态/相对文件路径 - 网站

Question

我正在使用 perl 等构建网站，我正在尝试打开一个文件并在网站上打印它的内容，但是在使用相对文件路径时我似乎无法使其工作...

    # Load our header.html template file
open (HEADER, "/xampp/htdocs/website/template/header.html") or die "Can't find header.html - check path...";
print (<HEADER>);

那行得通

但是，如果我可以做这样的事情，我会更喜欢它:

# Load our header.html template file
open (HEADER, "/template/header.html") or die "Can't find header.html - check path...";
print (<HEADER>);

Answer 1

如果您的完整路径是

/xampp/htdocs/website/template/header.html

而您目前在 /xampp/htdocs/website (这是您的脚本所在的位置，或者是 chdir 编辑)，然后您可以使用相对路径:

template/header.html

例如

open my $fh, "<", "template/header.html" or die $!;
print <$fh>;

注意三参数的使用 open带有词法文件句柄，并包含错误 $!在你的死亡声明中。