Question

Perl中是否有类似<?php phpinfo(); ?>的内容？

Answer 1

您想知道哪些信息？ phpinfo显然告诉你几乎所有事情：

输出有关PHP当前状态的大量信息。这包括有关PHP编译选项和扩展，PHP版本，服务器信息和环境（如果编译为模块），PHP环境，操作系统版本信息，路径，配置选项的主和本地值，HTTP标头和PHP的信息。许可证。

你可以在Perl中以某种方式获得大部分内容，但不是所有来自同一个地方。

Perl附带的Config模块具有解释器的编译选项
Probe::Perl可能会为您提供更好的界面
$^V具有当前解释器的版本（请参阅perlvar）
%ENV拥有环境（请参阅perlvar）
您可以使用Devel::CheckOS模块了解操作系统
除非您使用的是mod_perl，否则您的Perl CGI脚本可能无法直接访问HTTP标头

Answer 2

use Config qw(myconfig);

print myconfig();

打印perl -V所做的大部分信息。您还可以通过Config模块获取该信息的各个元素。

Answer 3

为了澄清，我已经包含了bash提示符号。

$ perl --version # This is what I would use

Answer 4

只需添加，不要忘记在文件中添加Perl bin路径。

我使用的示例脚本如下：

确保以下行是文件中的第一行：

#!/usr/bin/perl

或者对于Windows，可能是（取决于您的环境）：

#!C:/wamp/bin/Perl64/bin/perl.exe

摘录：

#!/usr/bin/perl
# test.cgi by Bill Weinman [http://bw.org/]
# Copyright 1995-2008 The BearHeart Group, LLC
# Free Software: Use and distribution under the same terms as perl.

use strict;
use warnings;
use CGI;

print foreach (
    "Content-Type: text/plain\n\n",
    "BW Test version 5.0\n",
    "Copyright 1995-2008 The BearHeart Group, LLC\n\n",
    "Versions:\n=================\n",
    "perl: $]\n",
    "CGI: $CGI::VERSION\n"
);

my $q = CGI::Vars();
print "\nCGI Values:\n=================\n";
foreach my $k ( sort keys %$q ) {
    print "$k [$q->{$k}]\n";
}

print "\nEnvironment Variables:\n=================\n";
foreach my $k ( sort keys %ENV ) {
    print "$k [$ENV{$k}]\n";
}

来源：http://cgi.bw.org/cgi-t/

是否有类似`<！ - ？php phpinfo（）;在Perl？ - >`

4 个答案: