Autoflush

[Antonin 'Tonino' Kmoch]

Dobry den,
   pouzivam komunikaci mezi serverem a klientem za pomoci
IO::Socket. Prestoze nastavim autoflush(1) nebo dokonce zavolam i metodu
flush, posledni radek se neodesle (jedine, kdyz na jeho konec pridam "\n",
coz nechci).

--
Cast kodu serveru vypada nasledovne:
my $listen = IO::Socket::INET->new('LocalPort' => $port,
        'Listen' => 20, 'Proto' => 'tcp', 'Reuse' => 1);
if (my $connect = $listen->accept) {
   $connect->autoflush(1);
   print $connect "Toto se odesle\n";
   print $connect "Toto ne";
   .
   .
--

Nevite prosim nekdo cim by to mohlo byt?

Mockrat predem dekuji!

				Tonda Kmoch