Socket.pm & print

[Honza Pazdziora]

> 
>     potrebuji shodou okolnosti napsat v perlu jednoduchou aplikaci
> se sockety. Resp. jednoducheho klienta a server. Mam vsak problemy
> se zapisem funkci print. Server ceka po spusteni na radek od
> klienta $line = <Client>; A klient jej posila takto: print "ahoj\n";
> Server vsak ceka a nic neprijme, predpokladam, ze to klient
> nevyprazdni buffer a ceka na dalsi data, ale mate me ten enter na konci.
> Kdyz stejna data poslu takto: $data = "ahoj\n"; syswrite SOCK, $data, 5;
> no tak vsechno jede OK. Videl jsem spoustu prikladu s pouzitm print,
> proc to nejde me ? Existuje nejaka moznost jako u IO:Socket Autoflush ?

	select Client;
	$| = 1;

anebo pouzit primo ten IO::Socket.

------------------------------------------------------------------------
 Honza Pazdziora | adelton na fi.muni.cz | http://www.fi.muni.cz/~adelton/
                   I can take or leave it if I please
------------------------------------------------------------------------