Primera Bravo2 control Perl Module