RosettaCodeData/Task/Delete-a-file/Mathematica/delete-a-file.math

6 lines
148 B
Plaintext

wd = NotebookDirectory[];
DeleteFile[wd <> "input.txt"]
DeleteFile["/" <> "input.txt"]
DeleteDirectory[wd <> "docs"]
DeleteDirectory["/" <> "docs"]