tasks a-s

Task/Reverse-a-string/AWK/reverse-a-string-1.awk

@@ -0,0 +1,10 @@
+function reverse(s)
+{
+  p = ""
+  for(i=length(s); i > 0; i--) { p = p substr(s, i, 1) }
+  return p
+}
+
+BEGIN {
+  print reverse("edoCattesoR")
+}

Task/Reverse-a-string/AWK/reverse-a-string-2.awk

@@ -0,0 +1,9 @@
+function reverse(s   ,l)
+{
+  l = length(s)
+  return l < 2 ? s:( substr(s,l,1) reverse(substr(s,1,l-1)) )
+}
+
+BEGIN {
+  print reverse("edoCattesoR")
+}