I am getting timed-out waiting for command prompt at C:\InstallV3\Test.pl line 5. Any Clue why ? thanks

  use Net::Telnet;
  $telnet = new Net::Telnet ( Timeout=>35,Prompt => '/ksh\$ $/');

  $telnet->open('sunspot');
  $telnet->login('snuppy', 'snuppy_dog');
  @lines = $telnet->cmd('who');
  print @lines;
  $telnet->close;
[download]