Perangkat :: Modem. Perangkat :: Modem adalah ekstensi Perl untuk berbicara dengan perangkat modem yang terhubung melalui port serial.
Unduh sekarang

Perangkat :: Modem. Peringkat & Ringkasan

Perangkat :: Modem. Tag

modem serial Perl Extension. port serial. Perangkat modem

Perangkat :: Modem. Keterangan

Perangkat :: Modem adalah ekstensi Perl untuk berbicara dengan perangkat modem yang terhubung melalui port serial. Perangkat :: Modem adalah ekstensi Perl yang dibuat untuk berbicara dengan perangkat modem yang terhubung melalui port serial .WarningThis ini adalah perangkat lunak beta, jadi gunakan dengan risiko Anda sendiri, dan tanpa garansi! Memiliki kesenangan.Synopsis menggunakan perangkat :: modem; $ modem saya = perangkat baru :: modem (port => '/ dev / ttys1'); If ($ modem-> Connect (Baudrate => 9600)) {Print "Connection! N"; } else {print "Maaf, tidak ada koneksi dengan port serial! n"; } $ modem-> Perhatian (); # KIRIM `Perhatian 'urutan (+++) ($ ok, $ jawaban) = $ modem-> Dial (' 02270469012 '); # Panggil nomor telepon $ OK = $ modem-> Dial (3); # 1 digit parameter = nomor panggil yang disimpan dalam memori 3 $ modem-> gema (1); # Aktifkan gema lokal (0 untuk menonaktifkan) $ modem-> Offhook (); # Lepas landas kait (siap untuk memanggil) $ modem-> hangup (); # mengembalikan modem menjawab $ modem-> is_active (); # Tes apakah perangkat modem aktif atau tidak # sejauh ini berfungsi untuk modem off / modem dengan syarat $ modem-> reset (); # hangup + perhatian + restore pengaturan 0 (z0) $ modem-> restore_factory_settings (); # Tangani dengan hati-hati! $ modem-> restore_factory_settings (1); # Sama dengan profil preset 1 (bisa 0 atau 1) $ modem-> send_init_string (); # Kirim string inisialisasi # sekarang ini diperbaiki untuk 'pada h0 z s7 = 45 s0 = 0 q0 v1 e0 c0 x4' # get / atur nilai s1 register $ s1 = $ modem-> s_register (1) $ S1 = $ modem-> s_register (1, 55); # Jangan lakukan itu jika Anda pasti tidak tahu! # Dapatkan status sinyal terkelola (CTS, DSR, RLSD, RING) Sinyal% saya = $ modem-> status (); Jika ($ sinyal {dsr}) {cetak "set data yang siap sinyal aktif! n"; } # Menyimpan nomor ini dalam memori modem nomor 3 $ modem-> toko_number (3, '01005552817'); $ modem-> ulangi (); # Ulangi perintah terakhir $ modem-> verbose (1); # Tanggapan Teks Normal (0 = Kode Numerik) # Beberapa RAW pada perintah $ modem-> ATSEND ('ATH0'); Cetak $ modem-> Jawaban (); $ modem-> atsend ('atdt01234567'. Perangkat :: modem :: cr); Cetak $ modem-> Jawaban (); Perangkat :: Modem Class mengimplementasikan BASIC AT (HAYES). Ini dapat diwarisi oleh sub kelas (sebagai perangkat :: GSM), yang didasarkan pada koneksi serial. Permennya: · Perl · Perangkat :: Persyaratan Serialport: · Perl. · Perangkat :: serialport

Perangkat :: Modem. Perangkat Lunak Terkait