set streamURL totext returned of(display dialog"Enter stream url:"default answer"")
do shell script"/Applications/VLC.app/Contents/MacOS/VLC -vvv "& streamURL &" :http-user-agent=\"AppleCoreMedia/1.0.0.8C148 (iPad; U; CPU OS 4_2_1 like Mac OS X; en_us)\""