Linux:: De input is een Linux interface van de inputgebeurtenis.

SYNOPSIS

Voorbeeld: 1 bedieningshendel die gebeurtenis API gebruikt

mijn $js1 = Linux:: Input->new (/dev/input/event3);
terwijl (1) {
terwijl (mijn @events = $js1->poll (0.01)) {
foreach (@event) {
}
}
}

Voorbeeld: 2 bedieningshendels die bedieningshendel API (verschillende gebeurtenisstructuur) met behulp van

mijn $js1 = Linux:: Input:: Joystick->new (/dev/input/js0);
mijn $js2 = Linux:: Input:: Joystick->new (/dev/input/js1);
mijn $selector = IO:: Select->new ();
$selector->add ($js1->fh);
$selector->add ($js2->fh);

terwijl (mijn $fh = $selector->can_read) {
mijn @event;
als ($fh == $js1->fh) {
@event = $js1->poll ()
} elsif ($fh == $js2->fh) {
@event = $js2->poll ()
}
foreach (@event) {
# het werk
}
}

Voorbeeld 3: controleer alle inputmechanismen

gebruiks Dossier:: Basename qw (basename);
mijn @inputs = kaart {„/dev/input/“. basename ($_)}
;

mijn @dev;
mijn $selector = IO:: Select->new ();
foreach (@inputs) {
mijn $device = Linux:: Input->new ($_);
$selector->add ($device->fh);
duw @dev, $device;
}

terwijl (mijn $fh = $selector->can_read) {
# het werk
}

Voorbeeld 4: het testen voor gebeurtenissen over de bevellijn

# informatie op welke gebeurtenis de rij behoort tot welk apparaat
kat /proc/bus/input/devices

# verifi downloaden