<% header('Router added') %> <%init> # XXX: access rights my $host = $cgi->param('host'); die 'invalid host' unless $host =~ /^[0-9.a-zA-Z\-]+$/; my $nms = new FS::NetworkMonitoringSystem; $nms->add_router($host);