URL1=`cat $1`
URL2=`wg $URL1 | perl -ne 'if (m/(rtsp:.*\.rm)/) {print $1;}'`

echo $URL2
FILE=`basename $URL2`
exec mplayer -dumpfile "$FILE" -dumpstream "$URL2"
