|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Valentin Nechayev 2:5020/400 13 Jul 2004 11:38:17 To : Mikhail Kostousov Subject : Re: Работа с модемом -------------------------------------------------------------------------------- >>> Mikhail Kostousov wrote: MK>Уже совсем замаялся... Hезнаю, где что искать... MK>Простенькая программка: MK>----begin of test.pl MK>#!/usr/bin/perl MK>my $port = "/dev/rfcomm0"; Это что за ОС? MK>use strict; MK>open F,"+<$port" or die $!; MK>printf F "ATZ\r"; MK>while ($a=<F>) MK>{ MK> printf $a; MK> sleep 1; MK>} MK>-----end of test.pl----------- MK> MK>Умудряется выводить во такой листинг: Сходи вот сюда: http://www.freebsd.org/cgi/man.cgi?query=termios (на версию системы не смотри, 99% этой информации приемлемы для любого юникса) и почитай про input processing, output processing и прочее. У тебя порт стоит несколько не в том режиме, в котором должен быть для нормальных переговоров с модемом. Скорее всего должен быть raw mode (он же non-canonical mode). Режим ты обязательно должен выставить сам какой нужен, нельзя полагаться на текущий. MK>Это я немного изоблачил проблему. Hе могу понять, от куда берется так MK>много переводов строк и аж два "OK"? Первое - скорее всего ICRNL или что-то похожее. Второе - какой-то другой артефакт текущего режима порта. -netch- --- ifmail v.2.15dev5.3 * Origin: Dark side of coredump (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/73687ccf1e39.html, оценка из 5, голосов 10
|