Perl Digger is a freeware Perl script to dig for information about the server-side environment including a list of all installed Perl modules with a handy link to their documentation at CPAN. The script is based on simple CSS, so you can easily modify how it looks.
Perl Digger is a freeware Perl script to dig for information about the server-side environment including a list of all installed Perl modules with a handy link to their documentation at CPAN. The script is based on simple CSS, so you can easily modify how it looks.
Please click here for the full code and a sample of what Perldigger looks like.
This post is tagged Stash/Code
11 Comments
i found it by chance by coming to your website. you should try to register it at hotscripts or cgi-resources. thanks for the very useful script
It’s done. Registered at both the websites you mention. Thanks..
Hi, this is a very good script. I have run it with Linux, BSD and Windows, it works well with Linux but not BSD and Windows. For BSD, the platform isn’t shown. So as the CPU and memory information.
Thanks for this cool script. I think one feature that you do not mention is that the HTML code is very conveniently put at the end of the script so it is very customizable without the fear of screwing up the code. Very good coding!
May be you should mention that as a “feature”.
Keep it up.
where can i find the code for this utility?
Tony, when you click on the link on this article, it takes you to what the output of Perldigger can look like. There is also a link there to “Get Perl code here”.
Anyway, the direct link is here: http://sniptools.com/code/perldigger.txt
The following code fixes the problem of the missing column of Perl modules in version 0.2.1.
Set $modColCount at the start to the number of columns you want to display. Then set the table’s colspan=$modColCount and you are good to go.
$colLength = $modcount/$modColCount;
for ($i=0; $i”;
sub displayModCol {
($colNum, $colLength, @modList) = @_;
my ($i, $startCol, $endCol);
$startCol = $colNum * $colLength;
$endCol = $colNum * $colLength + $colLength;
print “”;
for ($i=$startCol; $i$modList[$i]
~;
}
print “”; }
I’m trying to install your pearl script, but get errors. So far I’ve managed to clean up some, but the script fails at line 358 as described below:
syntax error at line 358, near “&”
syntax error at 358, near “@INC)”
syntax error at 363, near “>”
Help! Thanks!
Robert Byrne, where does your code get stuck in?
The code is Perl CGI. Cant you “stick” it in any place where your CGIs usually go?
Trying it on my hosts FreeBSD server - it sits there for around 10 minutes, and then just returns an empty page with basic html headers in the source:
Any way I can get round this as I really need some of the info it gives. Thanks!
Incoming Links