PHP, R, Rexx, Scheme, sed, SQL, and Tcl solutions for week 107, part 1

9 files changed, 76 insertions, 0 deletions

diff --git a/challenge-107/abigail/README.md b/challenge-107/abigail/README.md
index 33b50becb3..5dcab2794d 100644
--- a/challenge-107/abigail/README.md
+++ b/challenge-107/abigail/README.md
@@ -46,8 +46,15 @@ the definition of Self-descriptive Number is
 * [OCaml](ocaml/ch-1.ml)
 * [Pascal](pascal/ch-1.pl)
 * [Perl](perl/ch-1.pl)
+* [PHP](php/ch-1.pl)
 * [Python](python/ch-1.py)
+* [R](r/ch-1.r)
+* [Rexx](rexx/ch-1.rexx)
 * [Ruby](ruby/ch-1.rb)
+* [Scheme](scheme/ch-1.scm)
+* [sed](sed/ch-1.sed)
+* [SQL](sql/ch-1.sql)
+* [Tcl](tcl/ch-1.tcl)
 
 ### Blog
 
diff --git a/challenge-107/abigail/php/ch-1.php b/challenge-107/abigail/php/ch-1.php
new file mode 100644
index 0000000000..52646348a5
--- /dev/null
+++ b/challenge-107/abigail/php/ch-1.php
@@ -0,0 +1,11 @@
+<?php
+    //
+    // See ../README.md
+    //
+
+    //
+    // Run as: php ch-1.php
+    //
+
+    echo "1210, 2020, 21200\n";
+?>
diff --git a/challenge-107/abigail/r/ch-1.r b/challenge-107/abigail/r/ch-1.r
new file mode 100644
index 0000000000..b14a917727
--- /dev/null
+++ b/challenge-107/abigail/r/ch-1.r
@@ -0,0 +1,9 @@
+#
+# See ../README.md
+#
+
+#
+# Run as: Rscript ch-1.r
+#
+
+cat ("1210, 2020, 21200\n")
diff --git a/challenge-107/abigail/rexx/ch-1.rexx b/challenge-107/abigail/rexx/ch-1.rexx
new file mode 100644
index 0000000000..de95f9d159
--- /dev/null
+++ b/challenge-107/abigail/rexx/ch-1.rexx
@@ -0,0 +1,9 @@
+/*
+ * See ../README.md
+ */
+
+/*
+ * Run as: rexx ch-1.rexx
+ */
+
+say "1210, 2020, 21200"
diff --git a/challenge-107/abigail/scheme/ch-1.scm b/challenge-107/abigail/scheme/ch-1.scm
new file mode 100644
index 0000000000..e06fdfe6ec
--- /dev/null
+++ b/challenge-107/abigail/scheme/ch-1.scm
@@ -0,0 +1,9 @@
+;;;
+;;; See ../README.md
+;;;
+
+;;;
+;;; Run as: guile --no-auto-compile ch-1.scm
+;;;
+
+(display "1210, 2020, 21200\n")
diff --git a/challenge-107/abigail/sed/ch-1.sed b/challenge-107/abigail/sed/ch-1.sed
new file mode 100644
index 0000000000..899e5c5cfd
--- /dev/null
+++ b/challenge-107/abigail/sed/ch-1.sed
@@ -0,0 +1,12 @@
+#
+# See ../README.md
+#
+
+#
+# Run as: sed -f ch-1.sed < input-file
+#
+# For each line in the input file, we write the first three
+# self-describing numbers.
+#
+
+s/.*/1210, 2020, 21200/
diff --git a/challenge-107/abigail/sql/ch-1.sql b/challenge-107/abigail/sql/ch-1.sql
new file mode 100644
index 0000000000..ebb1f4b1ce
--- /dev/null
+++ b/challenge-107/abigail/sql/ch-1.sql
@@ -0,0 +1,9 @@
+--
+-- See ../README.md
+--
+
+-- 
+-- Run as: sqlite3 < ch-1.sql
+--
+
+SELECT "1210, 2020, 21200";
diff --git a/challenge-107/abigail/t/input-1-1 b/challenge-107/abigail/t/input-1-1
index e69de29bb2..8b13789179 100644
--- a/challenge-107/abigail/t/input-1-1
+++ b/challenge-107/abigail/t/input-1-1
@@ -0,0 +1 @@
+
diff --git a/challenge-107/abigail/tcl/ch-1.tcl b/challenge-107/abigail/tcl/ch-1.tcl
new file mode 100644
index 0000000000..59daf96335
--- /dev/null
+++ b/challenge-107/abigail/tcl/ch-1.tcl
@@ -0,0 +1,9 @@
+#
+# See ../README.md
+#
+
+#
+# Run as: tclsh ch-1.tcl
+#
+
+puts "1210, 2020, 21200"