As specified in the Net::Telnet docs, your prompt should be a match string.
Try something like:-

prompt =>'/c:.*?>/' #untested on a full session but does not throw an error
when called as below

Andy

----- Original Message -----
From: "Satish Vadlamani" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Sunday, July 01, 2001 4:52 AM
Subject: Help with executing a command on remote machine using Net::Telnet


> Hi:
> I am having trouble sending a command to the remote machine (both machines
> win2000). I don't want any interaction.  I just want to send a command to
be
> executed on the remote machine.  I am getting the following error:
>
> bad match operator: opening delimiter missing: c:.*\\> at
> C:\MATRIX~1\DF\controls\scripts\RUN_PR~3.PL line 17
>
> Here is the relevant part of my program.  Thanks a lot if you can be of
> help.
>
> use Cwd;
> use File::Basename;
> use Env;
> use Cwd;
> use File::Copy ;
> use File::Path ;
> use strict;
> use Data::Dumper;
> use Time::Local;
> use Win32;
> use Date::Calc;
> use Net::Telnet;
>
> $\ = "\n";
>
> my $t;
> $t = Net::Telnet->new (Timeout => 10,
>                       Host => 'MatrixDev',
>                       Prompt => 'c:.*\\\>'
>                                         );
> my $user_name = "administrator";
> my $password = "";
>
>         $t->login($user_name,$password);
>         #my $change_dir = $t->cmd("cd c:/MatrixDev/DF/controls/scripts");
>         #my $result = $->cmd("run_prod_secondary_aa.pl");
> _________________________________________________________________
> Get your FREE download of MSN Explorer at http://explorer.msn.com
>
> _______________________________________________
> Perl-Win32-Users mailing list
> [EMAIL PROTECTED]
> http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
>

_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users

Reply via email to