Аналог phpinfo() в Perl

 

Иногда необходимо быстро узнать список установленных Perl модулей, для этого пригодится простенький скрипт:

 

#!/usr/bin/perl
print "Content-type: text/html\n\n";
print "<html><head><title>Installed Perl Modules</title></head><body> <table width=\"300px\" border=1>Module Version";
use ExtUtils::Installed;
my $instmod = ExtUtils::Installed->new();
foreach my $module ($instmod->modules())
{ my $version = $instmod->version($module) || "-"; print "$module $version \r\n"; }
print "</table></body></html>";

Записываем его в файл, делаем файл исполняемым (chmod +x test.cgi) вводим адрес в браузере и смотрим список установленных модулей

Вы можете оставить комментарий, или ссылку на Ваш сайт.
скачать Far Cry 3 торрент бесплатно

Оставить комментарий