[ILUG] Perl Question.

[Martin Pegman]

Thanks Niall,
It was how it was being passed to the expect script.! When the system
line was changed to pass all the args in one line i.e.
system ("/root/grab\-config  $_  NetHop\-TFTP\-Access J65RFKJ86YT
82\.198\.129\.83  $_");

it came back fine.

Thanks again. 
Once more saved from beating my head of the walls by ILUG.
Martin P

On 6/8/05, Niall O Broin <niall at magicgoeshere.com> wrote:
> On 8 Jun 2005, at 11:11, Martin Pegman wrote:
> 
> > I have a little perl script to grab IP addresses form a hostname file
> > and pass them one by one to a working expect script to pull config
> > from cisco routers etc.
> > If I change the system line in the script (below) and paste the single
> > line output to the shell all works fine. However the perl script just
> > disapears with no errors.
> 
> What do you mean exactly ? Does the perl script not actually run the
> expect
> script  /root/grab\-config  for you?
> 
> > As you can see form the script I'm new to Perl so any pointers or
> > better ways to do this are appreciated.
> 
> Well, you're escaping too much, but better too much than too little :-)
> and you have a couple of tautologies, but no matter - that script
> appears to do what you appear to want :-) So, the first thing to figure
> out is if the expect script is actually getting called at all. the next
> thing to look at is how you've split up the arguments to system - you
> could try putting them all into one string.
> 
> 
> 
> Niall
> 
> --
> Irish Linux Users' Group
> http://www.linux.ie/mailman/listinfo/ilug/
> 
> 


-- 
The means by which we live have outdistanced the
ends for which we live. Our scientific power has 
outrun our spiritual power. We have guided missile
and misguided men. - Martin Luther King Jr.