Logo

Programming-Idioms

  • PHP
  • Fortran

Idiom #155 Delete file

Delete from filesystem the file having path filepath.

open (10,file=filepath,status="old", iostat=ierr)
if (ierr == 0) close (10,status="delete")

You cannot delete directly, but you can delete upon closing.
unlink($filepath);
with Ada.Directories;
Ada.Directories.Delete_File (filepath);
New implementation...
< > ⌨
programming-idioms.org 
open (10,file=filepath,status="old", iostat=ierr)
if (ierr == 0) close (10,status="delete")

unlink($filepath);
Ada.Directories.Delete_File (filepath);
int main(void)
{
	if (unlink(filepath) == -1)
		err(1, "unlink");
	return 0;
}
auto r = std::filesystem::remove(filepath);
File.Delete(filepath);
try
    remove(filepath);
catch (FileException fe)
    writeln(fe.msg);
File(filepath).deleteSync();
File.rm(filepath)
err := os.Remove(filepath)
removeFile filePath
await unlink(filepath)
try {
  fs.unlinkSync(filepath);
} catch (err) {
  console.error(err);
}
Deno.remove(filepath, { recursive: true }).catch((err) => console.error(err));
new File(filepath).delete();
deleteIfExists(of(filepath));
os.remove(filepath)
begin
  if DeleteFile(filepath) then
    writeln(filepath,' succesfully deleted.')
  else
    writeln('Error deleting ',filepath);
end.
unlink $filepath;
path = pathlib.Path(_filepath)
path.unlink()
os.remove(filepath)
File.delete(filepath)
let r = fs::remove_file(filepath);