Great! Now the sed programmer breaks way in me and gives another possibility:

($name . "\n sdp rtsp rts mov qt smi sml smil avi whatever ") =~ /\.(\
+S*)\n.* \1 / or die "wrong extension"
[download]