Data commit

Task/Delete-a-file/J/delete-a-file-1.j

@@ -0,0 +1,8 @@
+   load 'files'
+   ferase 'input.txt'
+   ferase '\input.txt'
+   ferase 'docs'
+   ferase '\docs'
+
+NB. Or all at once...
+   ferase 'input.txt';'/input.txt';'docs';'/docs'

Task/Delete-a-file/J/delete-a-file-2.j

@@ -0,0 +1,4 @@
+NB. =========================================================
+NB.*ferase v erases a file
+NB. Returns 1 if successful, otherwise _1
+ferase=: (1!:55 :: _1:) @ (fboxname &>) @ boxopen

Task/Delete-a-file/J/delete-a-file-3.j

@@ -0,0 +1,4 @@
+1!:55 <'input.txt'
+1!:55 <'\input.txt'
+1!:55 <'docs'
+1!:55 <'\docs'