Controlling Xine with Perl script

Hello,

I want to write a Perl script that is able to control the playback of files in xine.
I read about the xine library for perl, Video::xine, but thats not what I want...
I just want a little code that sends , for exemple, a signal to xine to pause playback, continue playback etc.

It would be possible to use little pieces of Shell scripts, but it would be much better if I can make it with Perl...

Thanks in advance :b: