|
Posted by Brian McCauley on April 30, 2006, 1:09 pm
Please log in for more thread options
Jim Gibson wrote:
>
> > Hey all,
> > I am new to modules as I have only used perl on Solaris to call external
> > executeables and write log files. I am really a Network Engineer that has
> > been saddled with running Openview on Solaris to manage VoIP.
> >
> > What I want to do is create a client app and a server app that sends IP
> > traffic to each other but would allow me to pass in QoS/ToS values as well
> > as port numbers. This will be used for testing in my lab
> >
> > Bassically I want to create traffic to go through a few hops and will be
> > able to test out Cisco routers and how they react to the packets that are
> > marked for queing and of course use perl to mark the packets.
>
> While perl has socket functions built-in, you should look into using
> the IO::Socket module and its derivative IO::Socket::Inet.
That's way too high level.
You may be able to manipulate ToS with something like
setsockopt($socket, SOL_IP, IP_TOS, IPTOS_LOWDELAY);
But note the constants SOL_IP, IP_TOS and IPTOS_LOWDELAY are probably
not in the Socket module so you'll hace to grab them out of the C
header files yourself.
My answer is based on Linux - ymmv.
| 
XML Sitemap