Getting the hostname is easy enough, get gethostbyname. The router type and IOS version are going to be more tricky.

The safest way would be to set up your SNMP environment correctly, and then ask the router to send you its 'system.sysDescr.0' OID. There are loads of ways to do this with Perl, but I don't know which way would suit you. Start by looking at Net::SNMP.

Another way would be to open up a telnet session with the router and ask it to tell you.

When I used to play with Cisco routers I was quite happy with Net::Telnet::Cisco. It's pretty simple to use if you're familiar with Net::Telnet or Expect. In a nutshell, if you can craft a command (e.g.: get version, you can get what you are looking for.

Shamelessly stealing from the documentation, an example of how you would go about this would look like:

  use Net::Telnet::Cisco;

  my $session = Net::Telnet::Cisco->new(Host => '123.123.123.123');
  $session->login('login', 'password');

  # Execute a command
  my @output = $session->cmd('show version');
  print @output;

  # Enable mode
  if ($session->enable("enable_password") ) {
      @output = $session->cmd('show privilege');
      print "My privileges: @output\n";
  } else {
      warn "Can't enable: " . $session->errmsg;
  }

  $session->close;
[download]

This approach is of course only as safe as your network. I would hope you use an account/password pair that has no privileges to change the routers' configurations.

There may be NET::SNMP based modules that do the same thing. Or I guess you could use Net::Telnet - assuming your routers have their telnet i/f enabled. But on the whole I'd recommend using a dedicated tool - this google query gives quite a few possibly relevant hits.

Dingus

Technically it is not freeware. From there site:

The SNMX program may be downloaded from this site. We license SNMX for in-house and OEM applications with our "SNMX Rapid Development Environment". With this license, you can construct powerful SNMP management applications for your site, product, or end user. You receive:

*SNIP*

Note that, without a license, SNMX cannot be redistributed with any hardware or software systems, nor incorporated in any hardware or software platform. SNMX is not freeware, and SNMP Frameworks, Inc. rigorously enforces this rule!

Reading their license it basically says you can use it free to help evaulate it. However, it looks interesting.

Long Answer:   type "cisco" in the Search box at the upper left, and look through the different programs that turn up.   I can just about guaruntee you'll see one that does what you're asking for.

Medium Answer:   go to my homenode, go to the #code section, and look through the different cisco-ey programs there.   I can just about guaruntee you'll see one the does what you're asking for.

Short Answer:   go to this node "(code) Cisco sho ver" and click the "d/l code" button at the bottom.   You'll need to install the Net::Telnet::Cisco module, and I *think* you'll already have Term::ReadKey and Getopt::Long as part of the standard Perl distrubtion since 5.6 maybe.   I wrote that ditty almost two years ago, so looks kludgey to me now, but should work for you.   If you feel ambitious you could extract SNMP chunks from "(code) Poor Man's TACACS - automate CatOS and IOS password resets with Net::Telnet::Cisco and Net::SNMP" and have a more cleanly coded tool.

ybiC, I have been playing with your scripts… and I have to say that they are quite impressive. I have the report working that I wanted and now I am faced with another dilemma. Getting a list of all of the ip addresses of the Cisco devices in my network!! I tried the cdp neighbor script and it works great up until it meets our Cisco IGX’s in our network. We have a layer 2 change at these devices from ATM to Frame and CDP will not cross it. Is there another way I can get a list of my Cisco devices? I thought about somehow pulling the eigrp neighbor list and using it for the seeds for the CDP script. Do you have any Ideas on how to modify the CDP script to do eigrp neighbor? I have around 3000 routers and switches and 164 people that can add devices to the network. In other words… things change every day. Thanks, Heldd