Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

problem sa send(); funkcijom

[es] :: Perl :: problem sa send(); funkcijom

[ Pregleda: 628 | Odgovora: 2 ]

 Postavi temu Odgovori

Autor
Pretraga teme: Traži
Markiranje Štampanje RSS

LH-frog
Croatia, Sisak

Član broj: 156829
Poruke: 2
*.adsl.net.t-com.hr.



Profil

icon problem sa send(); funkcijom14.09.2007. u 10:15

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
Blows your mind drastically, fantasically
It has to be, automatically
Check it out. you better work it out
Change to another bug
14.09.2007. u 10:15 

caiser
Karadzic Miljan
sys-admin wannabe
Brno

Član broj: 4677
Poruke: 2459
*.de.ibm.com.

ICQ: 162962030
Sajt: www.miljan.org


Profil

icon Re: problem sa send(); funkcijom14.09.2007. u 12:10
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";
Aj prevedi!
14.09.2007. u 12:10 

LH-frog
Croatia, Sisak

Član broj: 156829
Poruke: 2
*.adsl.net.t-com.hr.



Profil

icon Re: problem sa send(); funkcijom14.09.2007. u 17:01
zahvaljujem
Blows your mind drastically, fantasically
It has to be, automatically
Check it out. you better work it out
Change to another bug
14.09.2007. u 17:01 

[es] :: Perl :: problem sa send(); funkcijom

[ Pregleda: 628 | Odgovora: 2 ]

 Postavi temu Odgovori

Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.