This isn't a Perl question. It's apparently outside our area of expertise. You'll have better luck on more appropriate forums. Once you find out which API you can use, we can help you implement a solution in Perl.