How to print '8' in a bunch of languages.

29 files changed, 316 insertions, 0 deletions

diff --git a/challenge-155/abigail/awk/ch-2.awk b/challenge-155/abigail/awk/ch-2.awk
new file mode 100644
index 0000000000..7f68b294b3
--- /dev/null
+++ b/challenge-155/abigail/awk/ch-2.awk
@@ -0,0 +1,13 @@
+#!/usr/bin/awk
+
+#
+# See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+#
+
+#
+# Run as: awk -f ch-2.awk
+#
+
+BEGIN {
+    print "8"
+}
diff --git a/challenge-155/abigail/bash/ch-2.sh b/challenge-155/abigail/bash/ch-2.sh
new file mode 100644
index 0000000000..0a82fc973f
--- /dev/null
+++ b/challenge-155/abigail/bash/ch-2.sh
@@ -0,0 +1,11 @@
+#!/bin/sh
+
+#
+# See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+#
+
+#
+# Run as: bash ch-2.sh
+#
+
+echo "8"
diff --git a/challenge-155/abigail/basic/ch-2.bas b/challenge-155/abigail/basic/ch-2.bas
new file mode 100644
index 0000000000..9c6b8e7ea1
--- /dev/null
+++ b/challenge-155/abigail/basic/ch-2.bas
@@ -0,0 +1,9 @@
+010 REM 
+020 REM See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+030 REM 
+
+040 REM 
+050 REM Run as: basic ch-2.bas
+060 REM 
+
+100 PRINT "8"
diff --git a/challenge-155/abigail/bc/ch-2.bc b/challenge-155/abigail/bc/ch-2.bc
new file mode 100644
index 0000000000..f90bcee9df
--- /dev/null
+++ b/challenge-155/abigail/bc/ch-2.bc
@@ -0,0 +1,12 @@
+#!/usr/bin/bc
+
+#
+# See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+#
+
+#
+# Run as: bc ch-2.bc
+#
+"8
+"
+quit
diff --git a/challenge-155/abigail/befunge-93/ch-2.bf93 b/challenge-155/abigail/befunge-93/ch-2.bf93
new file mode 100644
index 0000000000..37a0c43aec
--- /dev/null
+++ b/challenge-155/abigail/befunge-93/ch-2.bf93
@@ -0,0 +1,2 @@
+< v,_@#:<   "8" +55
+  >     ^
diff --git a/challenge-155/abigail/c/ch-2.c b/challenge-155/abigail/c/ch-2.c
new file mode 100644
index 0000000000..7b12af682b
--- /dev/null
+++ b/challenge-155/abigail/c/ch-2.c
@@ -0,0 +1,16 @@
+# include <stdlib.h>
+# include <stdio.h>
+# include <string.h>
+
+/*
+ * See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+ */
+
+/*
+ * Run as: cc -o ch-2.o ch-2.c; ./ch-2.o
+ */
+
+int main (void) {
+    printf ("8\n");
+    exit (0);
+}
diff --git a/challenge-155/abigail/cobol/ch-2.cb b/challenge-155/abigail/cobol/ch-2.cb
new file mode 100644
index 0000000000..27054ec727
--- /dev/null
+++ b/challenge-155/abigail/cobol/ch-2.cb
@@ -0,0 +1,14 @@
+IDENTIFICATION DIVISION.
+PROGRAM-ID. XXX.
+
+*>
+*> See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+*>
+
+*>
+*> Run as: cobc -xF -o ch-2.o ch-2.cb; ./ch-2.o
+*>
+
+PROCEDURE DIVISION.
+    DISPLAY "8".
+    STOP RUN.
diff --git a/challenge-155/abigail/csh/ch-2.csh b/challenge-155/abigail/csh/ch-2.csh
new file mode 100644
index 0000000000..1193015e56
--- /dev/null
+++ b/challenge-155/abigail/csh/ch-2.csh
@@ -0,0 +1,11 @@
+#!/bin/csh
+
+#
+# See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+#
+
+#
+# Run as: csh ch-2.csh
+#
+
+echo "8"
diff --git a/challenge-155/abigail/erlang/ch-2.erl b/challenge-155/abigail/erlang/ch-2.erl
new file mode 100644
index 0000000000..8d151a1ad9
--- /dev/null
+++ b/challenge-155/abigail/erlang/ch-2.erl
@@ -0,0 +1,15 @@
+%
+% See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+%
+
+%
+% Run as: ln ch-2.erl ch2.erl
+%         erl -compile ch2
+%         erl -noshell -s ch2 main -s init stop
+%
+
+-module (ch2).
+-export ([main/0]).
+
+main () ->
+    io:fwrite ("8\n").
diff --git a/challenge-155/abigail/forth/ch-2.fs b/challenge-155/abigail/forth/ch-2.fs
new file mode 100644
index 0000000000..a406c5be72
--- /dev/null
+++ b/challenge-155/abigail/forth/ch-2.fs
@@ -0,0 +1,5 @@
+\
+\ See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+\
+
+.( 8)
diff --git a/challenge-155/abigail/fortran/ch-2.f90 b/challenge-155/abigail/fortran/ch-2.f90
new file mode 100644
index 0000000000..dcacb88434
--- /dev/null
+++ b/challenge-155/abigail/fortran/ch-2.f90
@@ -0,0 +1,12 @@
+!
+! See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+!
+
+!
+! Run as: gfortran -o ch-2.o ch-2.f90; ./ch-2.o
+!
+
+program ch2
+    implicit none
+    write (*, *) "8"
+end
diff --git a/challenge-155/abigail/go/ch-2.go b/challenge-155/abigail/go/ch-2.go
new file mode 100644
index 0000000000..b2b5d8d300
--- /dev/null
+++ b/challenge-155/abigail/go/ch-2.go
@@ -0,0 +1,15 @@
+package main
+
+//
+// See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+//
+
+//
+// Run as: go run ch-2.go
+//
+
+import "fmt"
+
+func main () {
+    fmt . Print ("8\n")
+}
diff --git a/challenge-155/abigail/java/ch-2.java b/challenge-155/abigail/java/ch-2.java
new file mode 100644
index 0000000000..b83ec3ce35
--- /dev/null
+++ b/challenge-155/abigail/java/ch-2.java
@@ -0,0 +1,13 @@
+//
+// See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+//
+
+//
+// Run as: ln ch-2.java ch2.java; javac ch2; java ch2
+//
+
+public class ch2 {
+    public static void main (String [] args) {
+        System . out . print ("8\n");
+    }
+}
diff --git a/challenge-155/abigail/lua/ch-2.lua b/challenge-155/abigail/lua/ch-2.lua
new file mode 100644
index 0000000000..cc544bab3e
--- /dev/null
+++ b/challenge-155/abigail/lua/ch-2.lua
@@ -0,0 +1,11 @@
+#!/opt/local/bin/lua
+
+--
+-- See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+--
+
+--
+-- Run as: lua ch-2.lua
+--
+
+print ("8")
diff --git a/challenge-155/abigail/m4/ch-2.m4 b/challenge-155/abigail/m4/ch-2.m4
new file mode 100644
index 0000000000..45a4fb75db
--- /dev/null
+++ b/challenge-155/abigail/m4/ch-2.m4
@@ -0,0 +1 @@
+8
diff --git a/challenge-155/abigail/mmix/ch-2.mms b/challenge-155/abigail/mmix/ch-2.mms
new file mode 100644
index 0000000000..c4ece31054
--- /dev/null
+++ b/challenge-155/abigail/mmix/ch-2.mms
@@ -0,0 +1,16 @@
+%
+% See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+%
+
+%
+% Run as: mmixal -o ch-2.mmo ch-2.mms; mmix -q ch-2.mmo
+%
+        LOC     Data_Segment
+        GREG    @
+Text    BYTE    "8",10,0
+
+        LOC     #100
+
+Main    LDA     $255,Text
+        TRAP    0,Fputs,StdOut
+        TRAP    0,Halt,0
diff --git a/challenge-155/abigail/node/ch-2.js b/challenge-155/abigail/node/ch-2.js
new file mode 100644
index 0000000000..a37cf4dbcf
--- /dev/null
+++ b/challenge-155/abigail/node/ch-2.js
@@ -0,0 +1,11 @@
+#!/usr/local/bin/node
+
+//
+// See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+//
+
+//
+// Run as: node ch-2.js
+//
+
+console . log ("8")
diff --git a/challenge-155/abigail/ocaml/ch-2.ml b/challenge-155/abigail/ocaml/ch-2.ml
new file mode 100644
index 0000000000..4c2d7a00f0
--- /dev/null
+++ b/challenge-155/abigail/ocaml/ch-2.ml
@@ -0,0 +1,9 @@
+(*                                                                   *)
+(* See https://theweeklychallenge.org/blog/perl-weekly-challenge-155 *)
+(*                                                                   *)
+
+(*                       *)
+(* Run as: ocaml ch-2.ml *)
+(*                       *)
+
+print_endline "8";
diff --git a/challenge-155/abigail/pascal/ch-2.p b/challenge-155/abigail/pascal/ch-2.p
new file mode 100644
index 0000000000..58b61407ec
--- /dev/null
+++ b/challenge-155/abigail/pascal/ch-2.p
@@ -0,0 +1,13 @@
+Program XXX;
+
+(*                                                                   *)
+(* See https://theweeklychallenge.org/blog/perl-weekly-challenge-155 *)
+(*                                                                   *)
+
+(*                                           *)
+(* Run as: fpc -och-1.out ch-2.p; ./ch-2.out *)
+(*                                           *)
+
+begin
+    writeln ('8')
+end.
diff --git a/challenge-155/abigail/php/ch-2.php b/challenge-155/abigail/php/ch-2.php
new file mode 100644
index 0000000000..673540a9dc
--- /dev/null
+++ b/challenge-155/abigail/php/ch-2.php
@@ -0,0 +1,11 @@
+<?php
+    //
+    // See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+    //
+
+    //
+    // Run as: php ch-2.php
+    //
+
+    echo "8\n"
+?>
diff --git a/challenge-155/abigail/postscript/ch-2.ps b/challenge-155/abigail/postscript/ch-2.ps
new file mode 100644
index 0000000000..2b5bcdcc70
--- /dev/null
+++ b/challenge-155/abigail/postscript/ch-2.ps
@@ -0,0 +1,10 @@
+%!PS
+%
+% See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+%
+
+%
+% Run as: ps2ascii ch-2.ps
+%
+
+(8) =
diff --git a/challenge-155/abigail/python/ch-2.py b/challenge-155/abigail/python/ch-2.py
new file mode 100644
index 0000000000..add52f46dc
--- /dev/null
+++ b/challenge-155/abigail/python/ch-2.py
@@ -0,0 +1,11 @@
+#!/usr/local/bin/python3
+
+#
+# See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+#
+
+#
+# Run as: python ch-2.py
+#
+
+print ("8")
diff --git a/challenge-155/abigail/r/ch-2.r b/challenge-155/abigail/r/ch-2.r
new file mode 100644
index 0000000000..b31f47c116
--- /dev/null
+++ b/challenge-155/abigail/r/ch-2.r
@@ -0,0 +1,11 @@
+#!/usr/local/bin/Rscript
+
+#
+# See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+#
+
+#
+# Run as: Rscript ch-2.r
+#
+
+cat ("8\n")
diff --git a/challenge-155/abigail/rexx/ch-2.rexx b/challenge-155/abigail/rexx/ch-2.rexx
new file mode 100644
index 0000000000..0c72e07c28
--- /dev/null
+++ b/challenge-155/abigail/rexx/ch-2.rexx
@@ -0,0 +1,9 @@
+/*
+ * See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+ */
+
+/*
+ * Run as: rexx ch-2.rexx
+ */
+
+say "8"
diff --git a/challenge-155/abigail/ruby/ch-2.rb b/challenge-155/abigail/ruby/ch-2.rb
new file mode 100644
index 0000000000..89201f03c8
--- /dev/null
+++ b/challenge-155/abigail/ruby/ch-2.rb
@@ -0,0 +1,11 @@
+#!/usr/bin/ruby
+
+#
+# See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+#
+ 
+#
+# Run as: ruby ch-2.rb
+#
+
+puts ("8");
diff --git a/challenge-155/abigail/scheme/ch-2.scm b/challenge-155/abigail/scheme/ch-2.scm
new file mode 100644
index 0000000000..32f4e107a3
--- /dev/null
+++ b/challenge-155/abigail/scheme/ch-2.scm
@@ -0,0 +1,12 @@
+#!/usr/local/bin/guile
+!#
+
+;;;
+;;; See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+;;;
+
+;;;
+;;; Run as: guile --no-auto-compile ch-2.scm
+;;;
+
+(display "8\n")
diff --git a/challenge-155/abigail/sed/ch-2.sed b/challenge-155/abigail/sed/ch-2.sed
new file mode 100644
index 0000000000..47c6b3c99f
--- /dev/null
+++ b/challenge-155/abigail/sed/ch-2.sed
@@ -0,0 +1,12 @@
+#
+# See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+#
+
+#
+# Run as: sed -f ch-2.sed
+#
+# For each line in the input file, we write the first three
+# self-describing numbers.
+#
+
+s/.*/8/
diff --git a/challenge-155/abigail/sql/ch-2.sql b/challenge-155/abigail/sql/ch-2.sql
new file mode 100644
index 0000000000..7ec0f80eb7
--- /dev/null
+++ b/challenge-155/abigail/sql/ch-2.sql
@@ -0,0 +1,9 @@
+--
+-- See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+--
+
+-- 
+-- Run as: sqlite3 < ch-2.sql
+--
+
+SELECT "8";
diff --git a/challenge-155/abigail/tcl/ch-2.tcl b/challenge-155/abigail/tcl/ch-2.tcl
new file mode 100644
index 0000000000..a98caeb8d6
--- /dev/null
+++ b/challenge-155/abigail/tcl/ch-2.tcl
@@ -0,0 +1,11 @@
+#!/usr/local/opt/tcl-tk/bin/tclsh
+
+#
+# See https://theweeklychallenge.org/blog/perl-weekly-challenge-155
+#
+
+#
+# Run as: tclsh ch-2.tcl
+#
+
+puts "8"