Data update

Task/Delete-a-file/Ada/delete-a-file-1.ada

@@ -1 +0,0 @@
-with Ada.Directories;  use Ada.Directories;

Task/Delete-a-file/Ada/delete-a-file-2.ada

@@ -1,4 +0,0 @@
-Delete_File ("input.txt");
-Delete_File ("/input.txt");
-Delete_Tree ("docs");
-Delete_Tree ("/docs");

Task/Delete-a-file/Batch-File/delete-a-file.bat

@@ -1,5 +1,6 @@
-del input.txt
+@echo off
+echo n | del /f input.txt
 rd /s /q docs
 
-del \input.txt
+echo n | del /f \input.txt
 rd /s /q \docs

Task/Delete-a-file/COBOL/delete-a-file-1.cobol

@@ -1,22 +0,0 @@
-       IDENTIFICATION DIVISION.
-       PROGRAM-ID. Delete-Files.
-
-       ENVIRONMENT DIVISION.
-       INPUT-OUTPUT SECTION.
-       FILE-CONTROL.
-           SELECT Local-File ASSIGN TO "input.txt".
-           SELECT Root-File  ASSIGN TO "/input.txt".
-
-       DATA DIVISION.
-       FILE SECTION.
-       FD  Local-File.
-       01  Local-Record PIC X.
-       FD  Root-File.
-       01  Root-Record  PIC X.
-
-       PROCEDURE DIVISION.
-           DELETE FILE Local-File
-           DELETE FILE Root-File
-           GOBACK.
-
-       END PROGRAM Delete-Files.

Task/Delete-a-file/COBOL/delete-a-file-2.cobol

@@ -1,12 +0,0 @@
-       IDENTIFICATION DIVISION.
-       PROGRAM-ID. Delete-Files.
-
-       PROCEDURE DIVISION.
-           CALL "CBL_DELETE_FILE" USING "input.txt"
-           CALL "CBL_DELETE_DIR"  USING "docs"
-           CALL "CBL_DELETE_FILE" USING "/input.txt"
-           CALL "CBL_DELETE_DIR"  USING "/docs"
-
-           GOBACK.
-
-       END PROGRAM Delete-Files.

Task/Delete-a-file/Elena/delete-a-file.elena

@@ -1,6 +1,6 @@
 import system'io;
 
-public program()
+public Program()
 {
     File.assign("output.txt").delete();
 

Task/Delete-a-file/Emacs-Lisp/delete-a-file.l

@@ -1,4 +0,0 @@
-(delete-file "input.txt")
-(delete-directory "docs")
-(delete-file "/input.txt")
-(delete-directory "/docs")

Task/Delete-a-file/PowerShell/delete-a-file.psh

@@ -1,6 +0,0 @@
-# possible aliases for Remove-Item: rm, del, ri
-Remove-Item input.txt
-Remove-Item \input.txt  # file system root
-
-Remove-Item -Recurse docs  # recurse for deleting folders including content
-Remove-Item -Recurse \docs

Task/Delete-a-file/REBOL/delete-a-file.rebol

@@ -1,7 +0,0 @@
-; Local.
-delete %input.txt
-delete-dir %docs/
-
-; Root.
-delete %/input.txt
-delete-dir %/docs/

Task/Delete-a-file/VBScript/delete-a-file.vb

@@ -1,21 +0,0 @@
-Set oFSO = CreateObject( "Scripting.FileSystemObject" )
-
-oFSO.DeleteFile "input.txt"
-oFSO.DeleteFolder "docs"
-
-oFSO.DeleteFile "\input.txt"
-oFSO.DeleteFolder "\docs"
-
-'Using Delete on file and folder objects
-
-dim fil, fld
-
-set fil = oFSO.GetFile( "input.txt" )
-fil.Delete
-set fld = oFSO.GetFolder( "docs" )
-fld.Delete
-
-set fil = oFSO.GetFile( "\input.txt" )
-fil.Delete
-set fld = oFSO.GetFolder( "\docs" )
-fld.Delete