Audio::Radio::Sirius 0.03

Audio::Radio::Sirius is a Perl module to control a Sirius satellite radio tuner.

SYNOPSIS

Sirius satellite radio (http://www.sirius.com) is a US based satellite radio serice. While none of the tuners they make have serial or USB connectors, it has been found that generation 2.5 tuners (Sportster, Starmate, * Replay, Sirius Connect, and others) have a common tuner module.

Furthermore this tuner module generally has a serial interface. Presently only one commercial site is offering a modification for adding a serial port to a Sirius tuner: http://www.rush2112.net. Google should reveal schematics and parts needed for adding ports to other tuners.

Once your tuner is connected to your system and accessible via a serial port like device, you can use this module to access it:

use Audio::Radio::Sirius;
use Win32::SerialPort; # or Device::SerialPort on Linux

my $serial = new Win32::SerialPort(com1);
my $tuner = new Audio::Radio::Sirius;

$tuner->connect($serial);
$tuner->power(1);
$tuner->channel(184); # tune in the preview channel