Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Perl: Системное программирование > Device::USB как прочитать hid

Автор: shamber 20.2.2013, 20:15

Здравствуйте!
Я пытаюсь получить информацию от hid устройства. Почитал доки получилось найти устройство, подключиться к нему получить список endpoint, но как дальше читать не знаю.
Работал ли кто-нибудь с Device::Usb?

Код


use Device::USB;
my $usb = Device::USB->new;
my $dev =$usb->find_device( 0x03eb, 0x204f );
$dev->open();
printf "Device: %04X:%04X\n", $dev->idVendor(), $dev->idProduct();
my $cfg = $dev->config()->[0];
my $inter = $cfg->interfaces()->[0]->[0];
my $ep = $inter->endpoints()->[0];
my $s = $dev->get_descriptor_by_endpoint($ep,)
print "Endpoint:", $ep->bEndpointAddress(), "\n";