ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Murad Askerzadeh                     2:5020/400     24 Jul 2000  02:42:29
 To : All
 Subject : Com port
 -------------------------------------------------------------------------------- 
 

 Хай Алл
 Задача - Заставить звонить модем из командной строки или из перла...
 
 >open(T,"+>/dev/cuaa0");
 >print T "ATZ\n";         #на АТЗ он как бы положил, потому что
 
                                     # ести вместо АТЗ, я вписывал АТА - и
 никакой реакции
 
 >while(<T>){ print; if($_ =~ /OK/){last;}}
 >print T "ATDP100\n";
 >while(<T>){ ... ну и т.д.
 >
 
 Дело в том. что у модема загорается TR, но звонить или делать что либо он
 отказывается, с чем это может быть связано?
 --- ifmail v.2.15dev5
  * Origin: Demos online service (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор