Data commit

Task/Execute-a-system-command/AWK/execute-a-system-command-1.awk

@@ -0,0 +1,4 @@
+BEGIN {
+  system("ls")		# Unix
+ #system("dir")		# DOS/MS-Windows
+}

Task/Execute-a-system-command/AWK/execute-a-system-command-2.awk

@@ -0,0 +1,15 @@
+BEGIN {
+         ls = sys2var("ls")
+         print ls
+}
+function sys2var(command        ,fish, scale, ship) {
+         command = command " 2>/dev/null"
+         while ( (command | getline fish) > 0 ) {
+             if ( ++scale == 1 )
+                 ship = fish
+             else
+                 ship = ship "\n" fish
+         }
+         close(command)
+         return ship
+}