---------8<------- print $sock 'kewl,blue27;'; $result=<$sock>; # << seems not working :( print "The response is : $result"; ---------8<-------
Try:- print $sock "kewl,blue27;\n"; Mind you if all you're doing is trying to automate a telnet session why not use the module Net::Telnet ? Just in _______________________________________________ ActivePerl mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
