#!/usr/bin/perl
use lib '../include';
use nms;
-#
-#
-
-my $username = '';
-my $password = 'removed';
-
-# Seconds to wait for connection
-my $timeout = 15;
use warnings;
use strict;
use Switch;
use CGI;
-use Net::Telnet;
use DBI;
# Grab from .htaccess-authentication