> Попробуйте так:
>
> #!/usr/bin/perl -w
> use IO::Handle;
> STDOUT->autoflush(1);
>
> $login = shift;
> $password = shift;
> while(1) {
> print "$login $password";
> sleep(1);
> }
то что доктор прописал, спасибоPS: а еще можно так (это я сам нашел): $|=1; впрочем это одно и то же :) -- To UNSUBSCRIBE, email to [EMAIL PROTECTED] with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

