This is a simple script that demonstrates how to control a Energenie
Pi-mote control board
from within Perl.
Usage should be self explanatory. Ensure you call do_setup at the start of your script
and ensure all of the sub-routines from the example are in your code. It is then a matter of
calling do_switch with two parameters, first the socket number you wish to use (0 for all)
and then either ON or OFF depending on what action you wish the socket to perform.
1.0 - Initial Release (Andrew Rawlins - firstname.lastname@example.org)
1.1 - Add training options, Code tidying, Support for rev 1 Pi (Ian Cook - email@example.com)
Current Version (1.1 - Fri Nov 27 2015) :
Previous Version (1.0 - Mon Oct 20 2014) :
Please feel free to report any ....
None, other than make sure the sockets are working with the remote control beforehand. The code will
need to be run as root or set-uid.
Andrew Rawlins - awr-energenie at this domain
awr - Fri Nov 27 02:50:41 2015