file.CreateDir("objsplit")

http.Fetch("http://dl.dropboxusercontent.com/u/125921922/Models/Ship.obj",function(str)
    for name, obj in str:gmatch("usemtl (.-)\n(.-)") do
        file.Write("objsplit/" .. name .. ".txt", obj)
    end
end)