Thread Frage zu telnet
(54 answers)
Opened by grey1987 at 2007-11-21 12:13
Nein, das hat mit Deinem Code nix zu tun. Der Server sendet anscheinend keinen Zeilenumbruch nach dem "ACK"...
Probier mal Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 #!/usr/bin/perl use strict; use warnings; use Net::Telnet; my $telnet = new Net::Telnet (Timeout => 10, Errmode=>'return', Port=>1810, Prompt => '/[\$%#>] $/' ); my $fh = $telnet->dump_log( 'test.log' ); $telnet->open('PC110197'); $telnet->errmode( sub{ return @_ unless $_[0] =~ /eof/ } ); my @ausg = $telnet->cmd('CLIENT CREATE'); my $data = $telnet->buffer; print $$data; OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/) -- Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html Perl-Entwicklung: http://perl-services.de/ |