#!/usr/bin/perl -w
#
# To listen to songs on MP3.com in Netscape
# ----------------------------------------- 
#      Mime Type: audio/x-mpegurl
#    Application: ~/bin/x-mpegurl.pl %s
# -----------------------------------------
#
use strict;
open(NETSCAPE_TMP_FILE, shift);
my $url = <NETSCAPE_TMP_FILE>;
chomp $url;
system "xmms -e '$url' &";
