Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re^3: Expect.pm control terminal width

by broomduster (Priest)
on Oct 07, 2008 at 22:19 UTC ( [id://715865]=note: print w/replies, xml ) Need Help??


in reply to Re^2: Expect.pm control terminal width
in thread Expect.pm control terminal width

Drop the quotation marks (the ones inside the qw): 
$object->stty(qw(cols 200));

[download]
What you have is passing "cols and 200" to stty, which it does not recognize (as indicated in the error messages). Also note that according to the docs, you probably want to be using the slave side of the pty: 
$object->slave->stty(qw(cols 200));

[download]

Replies are listed 'Best First'.
Re^4: Expect.pm control terminal width
by jmclark (Novice) on Oct 08, 2008 at 13:54 UTC
    Yea, thats what I was saying, I tried without quotes as well.
    Basically below is what I have: 
    $acnsex = new Expect();
$acnsex->slave->stty(qw(cols 200));
$acnsex->spawn("ssh -q -o 'UserKnownHostsFile ./output/keys.txt' -o 'S
+trictHostKeyChecking no' -l $username $acns");
$acnsex->log_user(0);
$acnsex->expect(10, '-re', 'password:');

    [download]
[reply]
[d/l]
Re^4: Expect.pm control terminal width
by jmclark (Novice) on Oct 08, 2008 at 14:40 UTC
    Also, looking at stty.pm I don't see that cols is a valid parameter which makes since with that error msg.
[reply]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://715865]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (4)
As of 2024-04-24 19:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found