Clojure version of the mobile phone music copying script