From: Sascha G. (02838) <Sas...@al...> - 2003-04-22 12:55:00
|
thx, my fault. now it looks like that: #!/tools/perl-5.6.0.sol26/bin/perl #use strict; $^W = 1; # warnings too use Expect; #$Expect::Exp_Internal = 1; #$Expect::Debug = 1; &start; $mtnm->hard_close(); exit(0); sub start { $mtnm = new Expect; $mtnm->raw_pty(1); $mtnm->spawn("csteMTNM -c"); $mtnm->log_file("rmtest.log", "w"); $mtnm->expect(30, "STARTUP FINISHED\r\n"); } and the error message tells me: ERROR: cannot find method `raw_pty' in class Expect at ./rmtest.pl line 25 Cannot exec `': |