Help for this page
/new password:
Enter l+ogin(NIS+ ) password
$telnet->waitfor('/new password: ?$/i') or report_error("ERROR", "No p +assword prompt found, contact Information Technologies: ");
$telnet->print($new_password);