This kind of stuff is what HAL is supposed to be for. I'm not aware of a Perl module to interface with it at the moment though. Maybe you could write one ;-)?