🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: pl.comp.lang.perl
3 messages
3 total messages Started by cz... Bart CZARnobyl Sun, 18 May 1997 00:00
IPC - sockety
#261
Author: cz... Bart CZARnobyl
Date: Sun, 18 May 1997 00:00
19 lines
1002 bytes
Czesc perlowcy,

Troche sie zaczalem grzebac w socketach w perlu i co: 
otoz standardowe funkcje we/wy cos niechetnie dzialaja z tymi
socketami - a w kazdym razie dolozenie jakies komunikacji 'w druga
strone' do exampla z perlipc skutecznie zawiesza programik na funkcji
we/wy na sockecie.

Rozwiazaniem okazalo sie byc uzycie funkcji sysread/syswrite - ale na 
pewno nie jest to jedyne sensowne rozwiazanie.

Czy ktos ma jakis dzialajacy przyklad client/server w ktorym komunikacja
odbywa sie w dwie strony z wykorzystaniem standardowych perlowych
funkcji/operatorow ?

-- 
Bartek Czardybon
http://www.silesia.pik-net.pl/~czar
Re: IPC - sockety
#262
Author: Artur Czechowski
Date: Mon, 26 May 1997 08:17
17 lines
1371 bytes
In pl.comp.lang.perl Bart CZARnobyl <czar@o1.mak.polsl.gliwice.pl> wrote:
 > socketami - a w kazdym razie dolozenie jakies komunikacji 'w druga
 > strone' do exampla z perlipc skutecznie zawiesza programik na funkcji
 > we/wy na sockecie.
Bendem strzelau:  tatatatata ;)
1. trzeba użyć biblioteki POSIX oraz funkcji select
2. ustawić socket jako niebuforowany przy odczycie

PS. Gdzieś chyba mam kawałek klienta ftp napisany w perlu. Jak znajdę
to podeślę. Albo wrzucę na WWW jak będzie więcej chętnych (dajcie znać
privmailem).

Pozdrówka
-- 
Artur Czechowski, arturcz@cyf.gov.pl,  Instytut Energii Atomowej, Świerk
http://www.cyf.gov.pl/~arturcz/
What's GPF? Doesn't it stand for "Get Programs from Finland"!
Re: IPC - sockety
#263
Author: Piotr Piatkowski
Date: Mon, 26 May 1997 14:40
26 lines
1555 bytes
Artur Czechowski <arturcz@cyf.gov.pl> wrote:
: In pl.comp.lang.perl Bart CZARnobyl <czar@o1.mak.polsl.gliwice.pl> wrote:
:  > socketami - a w kazdym razie dolozenie jakies komunikacji 'w druga
:  > strone' do exampla z perlipc skutecznie zawiesza programik na funkcji
:  > we/wy na sockecie.
: Bendem strzelau:  tatatatata ;)
: 1. trzeba użyć biblioteki POSIX oraz funkcji select
: 2. ustawić socket jako niebuforowany przy odczycie

A ja polecam wszystkim stosunkowo nową bibliotekę (obiektową!) 
IO::Socket

A tutaj przykład jej wykorzystania:

#!/usr/bin/perl

use IO::Socket;
$s = IO::Socket::INET->new( PeerAddr => "bofh.engr.wisc.edu",
                            PeerPort => 666, Proto => 'tcp' );
while(<$s>) { print unless /^===/; }


Dokumentacja: perldoc io/socket

-- 
Piotr Piątkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads