update

Task/String-concatenation/Aime/string-concatenation.aime

@@ -0,0 +1,8 @@
+text s, v;
+
+s = "Hello";
+o_text(s);
+o_newline();
+v = cat(s, ", World!");
+o_text(v);
+o_newline();

Task/String-concatenation/AppleScript/string-concatenation.applescript

@@ -0,0 +1,5 @@
+try
+    set endMsg to "world!"
+    set totMsg to "Hello, " & endMsg
+    display dialog totMsg
+end try

Task/String-concatenation/COBOL/string-concatenation.cobol

@@ -0,0 +1,15 @@
+       IDENTIFICATION DIVISION.
+       PROGRAM-ID. Concat.
+
+       DATA DIVISION.
+       WORKING-STORAGE SECTION.
+       01  Str  PIC X(7) VALUE "Hello, ".
+       01  Str2 PIC X(15).
+
+       PROCEDURE DIVISION.
+           DISPLAY "Str  : " Str
+           MOVE FUNCTION CONCATENATE(Str, " World!") TO Str2
+           DISPLAY "Str2 : " Str2
+
+           GOBACK
+           .

Task/String-concatenation/Racket/string-concatenation.rkt

@@ -0,0 +1,10 @@
+#lang racket
+(define hello "hello")
+(displayln hello)
+
+(define world (string-append hello " " "world" "!"))
+(displayln world)
+
+;outputs:
+;  hello
+;  hello world!

Task/String-concatenation/Raven/string-concatenation.raven

@@ -0,0 +1,15 @@
+# Cat strings
+"First string and " "second string" cat print
+
+# Join
+[ "First string" "second string" "third string" ] " and " join print
+
+# print
+[ "First string" "second string" "third string" ] each print
+
+# Formatted print
+"\n" "Third string" "Second string" "First string" "%s %s %s %s" print
+
+# Heredoc
+" - NOT!!" as $x
+"This is the only way to do it%($x)s" print