Add draft for a post about cutting CSV lines at the 10th column

_drafts/cut-at-ten.md

@@ -0,0 +1,5 @@
+``` lisp
+(defun cut-at-ten ()
+  (while (re-search-forward "," (save-excursion (end-of-line) (point)) t 10)
+    (newline-and-indent)))
+```