johngnub at cox.net
Wed Jan 14 21:05:48 CST 2004
us a shell telnet scr...examples on request...
On Wednesday, January 14, 2004, at 05:40 PM, Matt Alexander wrote:
> On Wed, 14 Jan 2004, Scott Walters wrote:
>> There is an example of raw sockets on phoenix.pm.org website,
>> but IO::Socket::INET is about the right level of abstraction for
>> what you're doing. Clearly Net::Telnet is too much of the wrong
>> abstraction. Raw sockets are usually too little abstraction.
>>> From the man page:
>> $sock = IO::Socket::INET->new(PeerAddr =>
>> PeerPort => '80',
>> Proto => 'tcp');
>> You can then print to $sock, $sock->print("foo!\n"), read from it,
>> read $sock, my $buffer, 8192, read lines from it, my $line = readline
>> and so on, just like a normal IO::Handle.
> I ended up using raw sockets and I can now grab all the data, but I'm
> sure how to disconnect after a certain period of time. The device I'm
> connecting to doesn't give any indication of when it's done sending
> So I basically need to grab everything, set an overall time limit of
> 5 seconds, and then disconnect after that time limit.
> Any suggestions?
More information about the Phoenix-pm