Pour exporter une vidéo au format iPod en utilisant QuickTime Player :

set videoPath to /Users/jeanffy/Desktop/example.flv
set extension to (do shell script
  "echo \"" & videoPath & "\" | sed 's/.*\\.//'")
set baseName to (do shell script
  "basename \"" & videoPath & "\" ." & extension)

tell application "QuickTime Player"
  open videoPath
  stop front document
  delay 5 -- pour laisser charger la video
  export front document to
    "/Users/jeanffy/Desktop/" & baseName & ".m4v" as iPhone
  close front document
end tell