• Home
  • History
  • Annotate
Name Date Size #Lines LOC

..03-May-2022-

lib/Net/Telnet/H06-Apr-2008-804457

t/H06-Apr-2008-5840

ChangesH A D06-Apr-2008478 1714

INSTALLH A D18-Jul-20021.8 KiB8149

MANIFESTH A D06-Apr-2008220 1211

META.ymlH A D06-Apr-2008384 1413

Makefile.PLH A D06-Apr-2008339 96

READMEH A D18-Jul-20023 KiB7557

README

1NAME
2    Net::Telnet::Ns1000 - interact with a Netscreen-1000 firewall
3
4SYNOPSIS
5    use Net::Telnet::Ns1000;
6
7    my $fw = new Net::Telnet::Ns1000(host=>'62.65.31.108');
8    $fw->login('admin','password') or die $fw->error;
9    $fw->enter_vsys('norway.com'); print "We are now in:
10    ".$fw->current_vsys."\n"; my %vsys=$fw->get_vsys; foreach $key (sort
11    (keys %vsys)) { print $key,'=', $vsys{$key},"\n"; } print @results;
12
13DESCRIPTION
14    Net::Telnet::Ns1000 is mostly a pure rippoff of Net::Telnet::Cisco, with
15    adaptations to make it work on the Netscreen 1000 firewalls. It also has
16    some additional commands, but for basic functionality, see Net::Telnet
17    and Net::Telnet::Cisco documentation.
18
19FIRST
20    Before you use Net::Telnet::Ns1000, you should probably have a good
21    understanding of Net::Telnet, so perldoc Net::Telnet first, and then
22    come back to Net::Telnet::Ns1000 to see where the improvements are.
23
24    Some things are easier to accomplish with Net::SNMP. SNMP has three
25    advantages: it's faster, handles errors better, and doesn't use any vtys
26    on the router. SNMP does have some limitations, so for anything you
27    can't accomplish with SNMP, there's Net::Telnet::Ns1000.
28
29METHODS
30    New methods not found in Net::Telnet follow:
31
32    enter_vsys - enter a virtual system
33        Enter a virtual system in the firewall. parameter is system you want
34        to enter .. You may enter another vsys even if you are in a vsys..
35        Note that we will save your changes for you if you do.
36
37    enter_vsys - exit from the level you are on
38        exit from the vsys you are in, or from the system if you are on the
39        top. takes one parameter... if you should save any changes or not...
40
41    current_vsys - show current vsys returns blank if you're not in a vsys.
42    get_vsys - return vsys.
43        returns a hash of all the virtual systems on your system, with
44        system id's for values
45
46    ping - ping a system. Returns percentage of success (0/100).
47          $sucess=$fw->ping('192.168.1.1');
48
49    exit - Exit system
50        use this command to exit system, or exit current vsys
51
52    getValue - Set a value from the box. Will return a value from the
53    firewall, or from the vsys you are in, if you aren't in root.
54    setValue - Set a Value in the box. Set a value in the box, returns true
55    if set successfully. (guess what it returns if you fuck up? ;)
56
57ISSUES
58    Note that on slow boxes, you might have to increase the Timeout
59    parameter to avoid the box timing out on quit (Saving takes a *long*
60    time on our ns1000)
61
62AUTHOR
63    The basic functionality was ripped from Joshua_Keroes@eli.net $Date:
64    2000/07/30 22:16:51 $ Modifications and additions to suit Netscreen was
65    done by Marcus.Ramberg@songnetworks.no $Date: 2002/07/18 10:45:12 $
66
67SEE ALSO
68    Net::Telnet, Net::SNMP
69
70COPYRIGHT
71    Copyright (c) 2001 Marcus Ramberg, Song Networks Norway. All rights
72    reserved. This program is free software; you can redistribute it and/or
73    modify it under the same terms as Perl itself.
74
75