X-Git-Url: http://git.shiar.nl/perl/plp/.git/blobdiff_plain/d4d1ccd8096dd890eccfaec5ca795803e42600b0..2f378f2720eee237f7dbe20643d6c2626c038580:/eg/plpinfo.plp diff --git a/eg/plpinfo.plp b/eg/plpinfo.plp index 9578327..748d40c 100644 --- a/eg/plpinfo.plp +++ b/eg/plpinfo.plp @@ -24,7 +24,7 @@ use Config; printf "%s%s\n", @$_ for ( ["System" => qx(uname -snrvm)], - ["Server API" => "CGI/FastCGI - ".$PLP::interface], #TODO + ["Server API" => $PLP::interface ? $PLP::interface : "?"], ["Perl" => join ".", map ord, split //, $^V], ["Build Date" => $Config{cf_time}], ["Debug Build" => $^P ? "yes" : "no"],