Device::Ericsson::AccessoryMenu is a Perl module that provides a framework for adding an accessory menu to devices that obey the EAM set of AT commands.
This allows you to write programs with similar function to the Romeo and Clicker applications for OSX, only instead of applescript your actions invoke perl subroutines (which of course may invoke applescript events, if that's your desire).
SYNOPSIS
my $remote = Device::Ericsson::AccessoryMenu->new;
$remote->menu( [ 'Remote' => [ pause => sub { ... },
Volume => [ up => sub { ... },
down => sub { ... },
],
],
] );
# on Win32, Win32::SerialPort should be equivalent
my $port = Device::SerialPort->new('/dev/rfcomm0')
or die "couldn't connect to T68i";
$remote->port( $port );
$remote->register_menu;
while (1) {
$remote->control;
}
Product's homepage
Requirements:
· Perl