Does anyone know of a way to, on a Win2003 box, restart a Windows Media Services publishing point programmatically through perl, or a Windows API command accessible via perl?
For those not familiar with Windows Media Services (lucky you), allow me to explain...At work, we're using a Windows 2003 server for media streaming using windows media services (WMS for short), and some important points:
- Individual streams are called "publishing points"
- Any number of publishing points are managed by the service itself (WMS)
- The publishing point in question determines what to stream by parsing a playlist file
- We have at least 2 other publishing points (used differently, so no issues with them)
Now, I've written a script to dynamically generate a playlist file for the music streamer (this would be run once every week or so)...however, I've run into some issues.
The publishing point i'm having trouble with is basically a looping playlist. When the server boots up, WMS starts the publishing point, which loads the playlist file (lets call it "list.wsx"). If, at any time after the publishing point is running, we make changes to list.wsx, the changes dont take effect until the publishing point is restarted.
So, what I need to do is restart this specific publishing point thus reloading the playlist file. I can't simply restart the entire WM service, however, because we have other publishing points that we dont want to interrupt.
I've scoured the CPAN for anything relating to WMS with no luck, and was hoping someone else might have experience hammering at it from perl?
__________
Build a man a fire, and he'll be warm for a day. Set a man on fire, and he'll be warm for the rest of his life.
- Terry Pratchett