playm3u

playm3u -- Have xmms play .m3u playlists from an HTTP server. Very simple hack to have xmms-1.2.10 from OpenBSD's ports collection play m3u playlists that reside on a web server, since

xmms http://url.to.playlist.m3u

does not seem to work.

#!/usr/bin/perl
$url = shift or die "usage: $0 http://url.to.playlist.m3u\n";
chdir "/tmp";
srand (time ^ $$ ^ unpack "%L*", `ps axww | gzip`);
$filename = "/tmp/playm3u." . int(rand(10000)) . ".m3u";
system "wget -c --output-document=$filename $url";
system "xmms $filename";
unlink $filename;