Hi All, I am new to perl. Could someone help me in using waitfor command from following code, i tried a lot but could not succeed and code is timing out at line 6. 
 
use Net::Telnet;
$telnet->open('godavari.bec.ge.com'); 
 $telnet->login ('anand','anand');
 $telnet->waitfor('/\$ $/i');
 $telnet->cmd("./EJS1.3.7.0/ejs/solaris/setup -console");
 $telnet->waitfor('/ Continue $/i') or die "Can't find enter to contin
+ue", $telnet->lastline;
 $telnet->print('');
 $telnet->close;
 exit;

[download]
How do i write a waitfor statement if my input log displays following lines on executing setup as on line 5 in the code.
InstallShield Wizard
Initializing InstallShield Wizard...
Preparing Java(tm) Virtual Machine...
................................... ................................... ................................... ................................... .............. Running InstallShield Wizard...
Welcome to the InstallShield Wizard for Enterprise JMS Server.
The InstallShield Wizard will install Enterprise JMS Server on your computer.
To continue, click Next.
Enterprise JMS Server
Please press Enter to Continue
Kindly help me in modifying line no 6 of the code.

edited: Mon Jun 21 17:56:53 2004 by jeffa - code tags

In reply to Problem in usage of waitfor in Telnet module by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.