Data update

Task/Walk-a-directory-Recursively/Ada/walk-a-directory-recursively.ada

@@ -1,24 +0,0 @@
-with Ada.Directories;  use Ada.Directories;
-with Ada.Text_IO;
-
-procedure Test_Directory_Walk is
-   procedure Walk (Name : String; Pattern : String) is
-      procedure Print (Item : Directory_Entry_Type) is
-      begin
-         Ada.Text_IO.Put_Line (Full_Name (Item));
-      end Print;
-      procedure Walk (Item : Directory_Entry_Type) is
-      begin
-         if Simple_Name (Item) /= "." and then Simple_Name (Item) /= ".." then
-            Walk (Full_Name (Item), Pattern);
-         end if;
-      exception
-         when Name_Error => null;
-      end Walk;
-   begin
-      Search (Name, Pattern, (others => True), Print'Access);
-      Search (Name, "", (Directory => True, others => False), Walk'Access);
-   end Walk;
-begin
-   Walk (".", "*.adb");
-end Test_Directory_Walk;

Task/Walk-a-directory-Recursively/Emacs-Lisp/walk-a-directory-recursively.l

@@ -1,2 +0,0 @@
-ELISP> (directory-files-recursively "/tmp/el" "\\.el$")
-("/tmp/el/1/c.el" "/tmp/el/a.el" "/tmp/el/b.el")

Task/Walk-a-directory-Recursively/PowerShell/walk-a-directory-recursively-1.psh

@@ -1 +0,0 @@
-Get-ChildItem -Recurse -Include *.mp3

Task/Walk-a-directory-Recursively/PowerShell/walk-a-directory-recursively-2.psh

@@ -1,2 +0,0 @@
-Get-ChildItem -Recurse |
-  Where-Object { $_.Name -match 'foo[0-9]' -and $_.Length -gt 5MB }

Task/Walk-a-directory-Recursively/PowerShell/walk-a-directory-recursively-3.psh

@@ -1,3 +0,0 @@
-Get-ChildItem -Recurse |
-  Where-Object { $_.Name -match 'foo[0-9]' } |
-  ForEach-Object { ... }

Task/Walk-a-directory-Recursively/PowerShell/walk-a-directory-recursively-4.psh

@@ -1 +0,0 @@
-| Where-Object { !$_.PSIsContainer }