problem sa send(); funkcijom

Odgovori Nova tema

2 odgovora
4.556 pregleda

problem sa send(); funkcijom 14.09.2007. u 11:15 · pre 232 meseca #1

Molio bih pomoc oko dolje navedenog koda:

Citat:

#!/usr/bin/perl

use IO::Socket;

$socket = new IO::Socket::INET->new (PeerAddr=> '69.55.233.82',
PeerPort=> 5842,
Proto=> 'tcp' );

@msg=qw(1 2 3 4);

$socket->send(@msg);
$socket->recv($txt);

print "$txt";

Citat:

usage: $sock->send(BUF, [FLAGS, [TO]]) at code.pl line 11

Potpis

Blows your mind drastically, fantasically
It has to be, automatically
Check it out. you better work it out
Change to another bug

Re: problem sa send(); funkcijom 14.09.2007. u 13:10 · pre 232 meseca #2

Ovo bi trebalo da radi.

Code:
#!/usr/bin/perl

use IO::Socket;

$socket = new IO::Socket::INET->new (PeerAddr=> '69.55.233.82',
PeerPort=> 5842,
Proto=> 'tcp' );

@msg=qw(1 2 3 4);

foreach (@msg) {
$socket->send($_);
}
$socket->recv($txt, 256);

print "$txt";

Potpis

Aj prevedi!

Re: problem sa send(); funkcijom 14.09.2007. u 18:01 · pre 232 meseca #3

zahvaljujem

Potpis

Blows your mind drastically, fantasically
It has to be, automatically
Check it out. you better work it out
Change to another bug

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme