Hi, I have a few modules that parse the output from the 'show ip route'
command typed at a Cisco router console.
Id like to use Cisco::ShowIPRoute::Parser as the module name. It
basically has a single entry point thus:
use Cisco::ShowIPRoute::Parser;
# Router.log holds the output from 'show ip route'
my $log = 'Router.log';
my $r = new Cisco::ShowIPRoute::Parser($log);
my $dest = '10.159.25.44';
my @routes = $r->getroutes($dest);
Cisco::ShowIPRoute::Parser uses a simple C function we have written to
make testing wether an IP is within a subnet. We would like to call it
Cisco::ShowIPRoute::NetCheck. It is used like this:
use Cisco::ShowIPRoute::NetCheck;
my $dest = '10.25.159.2';
my $mask = '255.255.255.0';
my $net = '10.25.159.0';
my $innet = Cisco::ShowIPRoute::NetCheck::NetCheck($net,$mask,$dest);
print "Yep $dest in $net\n" if $innet;
I'd like some comment on the naming thanks.
cheers
Mark
