<% include("/elements/header.html",'Routers', menubar('Main Menu' => $p)) %> % % %my @router = qsearch('router', {}); %my $p2 = popurl(2); % % % if ($cgi->param('error')) { Error: <%$cgi->param('error')%>

% } % %my $hidecustomerrouters = 0; %my $hideurl = ''; %if ($cgi->param('hidecustomerrouters') eq '1') { % $hidecustomerrouters = 1; % $cgi->param('hidecustomerrouters', 0); % $hideurl = 'Show customer routers'; %} else { % $hidecustomerrouters = 0; % $cgi->param('hidecustomerrouters', 1); % $hideurl = 'Hide customer routers'; %} % Add a new router | <%$hideurl%> <%table()%> Router name Address block(s) % foreach my $router (sort {$a->routernum <=> $b->routernum} @router) { % next if $hidecustomerrouters && $router->svcnum; % my @addr_block = $router->addr_block; % if (scalar(@addr_block) == 0) { % push @addr_block, ' '; % } % <%$router->routername%> % foreach my $block ( @addr_block ) { <%UNIVERSAL::isa($block, 'FS::addr_block') ? $block->NetAddr : ' '%> % } % } <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Configuration');