<%= header('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 : ' '%> <% } %> <% } %>