git.shiar.nl
/
perl
/
plp
/
.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add a few todo entries
[perl/plp/.git]
/
eg
/
plpinfo.plp
diff --git
a/eg/plpinfo.plp
b/eg/plpinfo.plp
index 95783279858335b5911a3cd05a9927c5f250793b..748d40c93690444f0c1f38a7111d8e66c257e7ed 100644
(file)
--- a/
eg/plpinfo.plp
+++ b/
eg/plpinfo.plp
@@
-24,7
+24,7
@@
use Config;
printf "<tr><th>%s</th><td>%s</td></tr>\n", @$_ for (
["System" => qx(uname -snrvm)],
use Config;
printf "<tr><th>%s</th><td>%s</td></tr>\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"],
["Perl" => join ".", map ord, split //, $^V],
["Build Date" => $Config{cf_time}],
["Debug Build" => $^P ? "yes" : "no"],