Cihaz :: Modem Cihaz :: Modem, seri bağlantı noktası üzerinden bağlı modem cihazlarıyla konuşmak için bir perl uzantısıdır.
Şimdi İndirin

Cihaz :: Modem Sıralama ve Özet

Cihaz :: Modem Etiketler

modem seri Perl uzatma seri port modem cihazları

Cihaz :: Modem Açıklama

Cihaz :: Modem, seri bağlantı noktası üzerinden bağlı modem cihazlarıyla konuşmak için bir perl uzantısıdır. Cihaz :: Modem, seri port ile bağlı modem cihazlarıyla konuşmak için yaratılan bir perl uzantısıdır. Warningthis beta yazılımıdır, bu nedenle kendi sorumluluğunuzdadır ve herhangi bir garanti olmadan kullanın! FUN.SYNOPSIS kullanımı Cihaz :: Modem kullanın; $ Modem = Yeni Cihaz :: Modem (Port => '/ dev / ttys1'); Eğer ($ modem-> bağlayın (baudrate => 9600)) {"Bağlı! N"; } else {"Üzgünüm, Seri Port ile bağlantı yok! N"; } $ modem-> dikkat (); # 'DİKKAT' Sırasını (+++) ($ OK, $ Cevap) = $ Modem-> Dial ('0227770469012') gönderin; # arama telefon numarası $ Tamam = $ modem-> kadran (3); # 1-digit parametre = belleğe kaydedilen arama numarası 3 $ modem-> echo (1); # Yerel yankının (0'ı devre dışı bırakma) $ modem-> offhook (); # KAPALI (Arama Yapmaya Hazır) $ Modem-> Hangup (); # döndürür Modem Cevap $ Modem-> IS_ACTIACT (); # Modem cihazının etkin olup olmadığını test eder veya şu ana kadar $ Modem-> Reset () koşulunda modem / modem için çalışır; # HANGUP + DİKKAT + Geri Yükleme Ayarı 0 (Z0) $ Modem-> Restore_Factory_Settings (); # Dikkatli tutun! $ modem-> restore_factory_settings (1); # Önceden ayarlanmış profil 1 ile aynı (0 veya 1 olabilir) $ modem-> send_init_string (); # Başlatma Dizesi # Gönder Şimdi bu, H0 Z S7 = 45 S0 = 0 Q0 V1 E0 C0 X4 '# GET / SET DEĞERLENDİRMEYİ GÖNDERİN $ S1 = $ MODEM-> S_REGISTER (1); $ S1 = $ modem-> S_Register (1, 55); # Kesinlikle bilmiyorsan bunu yapma! # Yönetilen sinyallerin durumunu alın (CTS, DSR, RLSD, Ring)% Sinyalim = $ Modem-> Durum (); Eğer ($ sinyal {dsr}) {yazdır "Veri ayarını hazır sinyali etkin! N"; } # Bu numarayı modem hafızasında 3 $ Modem-> Store_Number (3, '01005552817'); $ Modem-> Tekrarla (); # Son komut $ Modem-> Verbose (1); # Normal Metin Yanıtları (0 = Sayısal Kodlar) # Bazı RAW komutlarında $ modem-> atsend ('ath0'); $ modem-> cevap () yazdırın; $ Modem-> atsend ('ATDT01234567'. Cihaz :: Modem :: cr); Yazdır $ Modem-> Cevap (); Cihaz :: Modem sınıfı, (HayES) uyumlu cihaz soyutlamasını temel alıyor. Seri bağlantılara dayanan alt sınıflar (Cihaz :: GSM) tarafından miras alınabilir. Seriquirements: · Perl · Cihaz :: SerialPort Gereksinimleri: · Perl · Cihaz :: Serialport

Cihaz :: Modem İlgili Yazılım