Perlscripting, making a call

Hi I installed Asterisk on my ubuntu box and installed chan_mobile. Now this all works(Asterisk finds my mobile and is paired with the cellphone). My intention is creating a perl script that calls some one @ home and play an mp3 and I was hoping to use asterisk for this. Is there a simple command I can execute from my script to make that call. Something like make_call(phone-nr,wave-file).

I’ve been searching the forums,oreilly book, but I can’t seem to find what I am looking for (it’s all to complex for just creating a call? ).

Any help would be appreciated.

ps: the Originate command, does it work with chan_mobile. (show channels doesn’t show the mobile phone)