Linux :: Input.

Linux :: Input ist eine Linux-Input-Ereignisschnittstelle.
Jetzt downloaden

Linux :: Input. Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • John BEPPU
  • Website des Verlags:
  • http://search.cpan.org/~beppu/

Linux :: Input. Stichworte


Linux :: Input. Beschreibung

Linux :: Input ist eine Linux-Input-Ereignisschnittstelle. Linux :: Input ist ein Linux-Input-Ereignisschnittstellen .SynopsisExample: 1 Joystick mit Ereignis-API My $ JS1 = Linux :: Input-> NEU ('/ dev / input / Event3'); Während (1) {während (meine @events = $ js1-> umfrage (0.01)) {foreach (@eevent) {}}}} Beispiel: 2 Joysticks mit Joystick-API (unterschiedliche Ereignisstruktur) My $ js1 = Linux :: Input :: Joystick-> Neu ('/ dev / input / js0'); My $ js2 = Linux :: Input :: Joystick-> Neu ('/ dev / input / js1'); MEIN $ SELECTOR = IO :: SELECT-> NEUE (); $ selektor-> Hinzufügen ($ JS1-> FH); $ selector-> add ($ js2-> fh); während (mein $ fh = $ selektor-> can_read) {mein @event; if ($ FH == $ js1-> fh) {@event = $ js1-> poll ()} elsif ($ FH == $ js2-> fh) {@event = $ js2-> poll ()} foreach ( @Event) {# Work}} Beispiel 3: Überwachen Sie alle Eingabegeräte verwenden Datei :: Basename QW (Basename); meine @inputs = map {"/ dev / input /". Basename ($ _)}; mein @ dev; MEIN $ SELECTOR = IO :: SELECT-> NEUE (); foreach (@inputs) {My $ Device = Linux :: Input-> Neu ($ _); $ selektor-> Hinzufügen ($ device-> fh); Drücken Sie @Dev, $-Gerät; } While (My $ FH = $ Selector-> can_read) {# Work} Beispiel 4: Testen für Ereignisse auf der Befehlszeile # Informationen zu welcher Ereignis-Warteschlange zu welchem Gerät Cat / ProC / Bus / Input / Geräte # bestätigen diese Ereignisse kommen in sudo evtest.pl / dev / input / event * Anforderungen: · Perl.


Linux :: Input. Zugehörige Software