Здравствуйте.
Нужно читать из
$pn='/dev/ttyS1';
system "stty -F $pn cs8 -cstopb clocal raw 1200";
open S,"+<$pn" or die $!;
select S; $|=1; select STDOUT;
while($ch=getc(S))
{
print $_;
}
close S;
Запись для отладки идет из ttyS1, при передаче второй строки начинается массовое чтение мусора, которое лечится передачей 30-100 \n, явление прекращается и все работает нормально до следущего перезапуска ПЕРЕДАЮЩЕЙ проги. Эта прога нужна для опроса упса, который отвечает 16-ю байтами на один, запрос проходит нормально, но в ответе полно мусора :(
вероятно это связано с буферизацией? Подскажите кому не лень :)
Спасибо.
Коля.
|
Вариант для распечатки
Программирование под UNIX (Public)
(??) on 21-Сен-07, 02:04 
