Poe :: Bauteil :: Telefonie :: Ctport

Nichtblockierende Telefonieprogrammierung in Perl
Jetzt downloaden

Poe :: Bauteil :: Telefonie :: Ctport Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • David Davis
  • Website des Verlags:
  • http://search.cpan.org/~xantus/POE-Component-Proxy-MSN-0.02/lib/POE/Component/Proxy/MSN.pm

Poe :: Bauteil :: Telefonie :: Ctport Stichworte


Poe :: Bauteil :: Telefonie :: Ctport Beschreibung

Nicht blockierende Telefonieprogrammierung in Perl Poe :: Bauteil :: Telefonie :: Ctport ist eine nicht blockierende Telefonieprogrammierung in Perl.Synopsis Verwenden Sie POE QW (Compoent :: Telefonie :: ctport); Poe :: session-> erstellen (inline_starts => {_start => sub {mein $ kernel = $ _ ; poe :: bauteil :: telefonie :: ctport-> spawn ({alias => 'ctport', Port => 1,}); $ kernel-> post (ctport => 'connect');}, verbunden => sub {My $ kernel = $ _ ; drucken "mit CTServer an Port 1 zusammenschließen ";}, input => sub {my ($ kernel, $ in) = @_ ; # Alle Ereignisse werden hier gesendet, dies ist ein guter # Platz, um Daten zu verwenden :: Dumper, wenn ($ In- > {Rly} EQ 'Ring') {$ Kernel-> Ertrag (Ring => $ in);}}, Ring => Sub {My $ Kernel = $ _ ; # Pick-up-Telefon $ Kernel-> Beitrag (ctport => 'off_hook'); # Play Piep $ Kernel-> Beitrag (Ctport => Play => 'Piep'); # aufnehmen $ kernel-> post (ctport => record => # zu dieser Datei 'Prompt. WAV ', # für 15 Sekunden 15, # oder bis sie #' # '' # ', # oder 3 Sekunden Schweigen 3,); # spiele es zurück zu ihnen $ kernel-> post (ctport => play =>' Prompt. WAV '); # Play 3 Pieptes $ Kernel-> Beitrag (Ctport => Play =>' Piep-Piepton "); # Hangup $ Kernel-> Beitrag (ctport => 'on_hook'); # Herunterfahren $ Kernel-> Beitrag (ctport => 'trennen'); $ kernel-> post (ctport => 'Herunterfahren');},}); Anforderungen: · Perl.


Poe :: Bauteil :: Telefonie :: Ctport Zugehörige Software

Über uns