Help for this page

Select Code to Download


  1. or download this
    modem->is_active() 
returned active,

($ok, $answer) = $modem->dial('mynumber',5);  # dial phone number
print "ok=$ok, answer=$answer\n";
  2. or download this
    $answer1=$modem->atsend( 'ATD38813453');
print "answer is ";
...
print "answer1 is $answer1\n";
print "\n";
print "at command was sent\n";
  3. or download this
    answer is ATD38813453
answer1 is 1