aboutsummaryrefslogtreecommitdiffstats
path: root/include/nms.pm
diff options
context:
space:
mode:
authorKnut Auvor Grythe <knut@auvor.no>2015-03-31 16:04:44 +0200
committerKnut Auvor Grythe <knut@auvor.no>2015-03-31 16:04:44 +0200
commit69747efcf8aca1a3c1241eb126bf0d0e27b8af05 (patch)
treee7a86213e402f9f6a4e42584b17104e6b5e418b0 /include/nms.pm
parentaef116e3b3644f2b86b8c34150bb19fe5afe669f (diff)
clean up juniper-ssh code
Diffstat (limited to 'include/nms.pm')
-rwxr-xr-xinclude/nms.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/include/nms.pm b/include/nms.pm
index 479e013..589f7f0 100755
--- a/include/nms.pm
+++ b/include/nms.pm
@@ -10,7 +10,7 @@ use FileHandle;
package nms;
use base 'Exporter';
-our @EXPORT = qw(switch_disconnect switch_connect_ssh switch_connect switch_exec switch_timeout db_connect);
+our @EXPORT = qw(switch_disconnect switch_connect_ssh switch_connect_dlink switch_exec switch_timeout db_connect);
BEGIN {
require "config.pm";
@@ -75,7 +75,7 @@ sub switch_connect_ssh($) {
return { telnet => $telnet, ssh => $ssh, pid => $pid, pty => $pty };
}
-sub switch_connect($) {
+sub switch_connect_dlink($) {
my ($ip) = @_;
my $dumplog = FileHandle->new;
@@ -110,7 +110,7 @@ sub switch_connect($) {
$conn->cmd($nms::config::tacacs_pass);
}
}
- return ($conn);
+ return { telnet => $conn };
}
# Send a command to switch and return the data recvied from the switch