NAME

Device::USB::PX1674 - Perl CMD-Class for Revolt USB Dongle PX-1674-675

SYNOPSIS

  use Device::USB::PX1674;
  
  my $px = Device::USB::PX1674->new(
    addr => 0x1A85, # inhouse code
    verb => 1,      # verbose output, shown as hex-dump
  ) || die $@;
  
  # Set Device 1 to state on
  $px->On(1);  
  
  # Switch off entire group
  $px->switch('Off');

DESCRIPTION

The instance of this class sends commands to USB-Dongle for switching on/off a certain device. Each device using this API must be configured for using libusb.

For a inhouse code it is possible to switch up to 6 devices in one group.

The Perl-Library Device::USB must be installed an each devices must be configured for using libusb.

CONSTRUCTOR

Available options are:

  vid  => 0xFFFF,   # Vendor ID
  pid  => 0x1122,   # Product ID
  ept  => 0x02,     # Endpoint Out
  addr => 0x1A1A,   # Hauscode
  intf => 0,        # Interface 
  cfg  => 1,        # Configuration
  verb => 0,        # Verbose

METHODS

  On();
    If argument omitted, On() is switching entire group of devices.
      
  Off();
    Similar to On(); 
  
  switch('On',3);
    Same as On, Off but now 'On' or 'Off' are arguments. Group-switching similar to methods above.

AUTHOR

Rolf Rost, < pilgrim@rolfrost.de >

COPYRIGHT AND LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.16.3 or, at your option, any later version of Perl 5 you may have available.