Netdisco Statistics

Statistics took <%$time9 - $time1 %> seconds to process.

Glossary

<& SELF:about_box &> <%init> $m->flush_buffer(); my $time1 = time; my $device_count = sql_scalar('device',['COUNT(*)']); my $time2 = time; my $device_port_count = sql_scalar('device_port',['COUNT(*)']); my $time3 = time; my $device_ip_count = sql_scalar('device_ip',['COUNT(alias)']); my $time4 = time; my $node_count = sql_scalar('node',['COUNT(DISTINCT(mac))']); my $time5 = time; my $node_table_count = sql_scalar('node',['COUNT(*)']); my $time6 = time; my $ip_count = sql_scalar('node_ip',['COUNT(DISTINCT(ip))']); my $time7 = time; my $ip_table_count = sql_scalar('node_ip',['COUNT(ip)']); my $time8 = time; my $device_links = sql_scalar('device_port',['COUNT(*)'],{'remote_ip' => 'is not null'}); my $time9 = time; <%method about_box> % my $pg_ver = sql_scalar('device',['version()']);

About Netdisco

  Netdisco Version: <%$netdisco::VERSION%>  
Perl Version: <% join('.',map(ord,split(//,($^V)))) %> (<%$]%>)
Postgres Version: <%$pg_ver |h%>
DBI <%$DBI::VERSION |h%> DBD::Pg <%$DBD::Pg::VERSION |h%>
Apache Info: <%$ENV{SERVER_SOFTWARE}%>
mod_perl Version: <%$mod_perl::VERSION%>
Mason: Powered by Mason Version <%$HTML::Mason::VERSION%>
ZGRViewer: Verison 0.8.2 Interactive GraphViz .svg Viewer used for Network Map. Author: Emmanuel Pietriga
<%init> my $path = $netdisco::CONFIG{webpath}; <%method title> - About Netdisco \ %# $Id: stats.html,v 1.12 2009/06/02 22:33:22 maxbaker Exp $ %# vim:syntax=mason