String append

String append
You are encouraged to solve this task according to the task description, using any language you may know.

Basic Data Operation
This is a basic data operation. It represents a fundamental action on a basic data type.

You may see other such operations in the Basic Data Operations category, or:

Integer Operations
Arithmetic | Comparison

Boolean Operations
Bitwise | Logical

String Operations
Concatenation | Interpolation | Comparison | Matching

Memory Operations
Pointers & references | Addresses

Create a string variable equal to any text value. Append the string variable with another string literal.

To illustrate the operation, show the content of the variable.

ALGOL 68

Works with: ALGOL 68 version Revision 1.

Works with: ALGOL 68G version Any - tested with release algol68g-2.7.

Works with: ELLA ALGOL 68 version Any (with appropriate job cards).

File: String_append.a68<lang algol68>#!/usr/bin/a68g --script #

1. -*- coding: utf-8 -*- #

STRING str := "12345678"; str +:= "9!"; print(str)</lang>Output:

123456789!

Perl

<lang perl>my $str = "foo"; $str .= "bar"; print $str, "\n";</lang>

Output:

foobar

Perl 6

<lang perl6>my $str = "foo"; $str ~= "bar"; say $str;</lang>

Output:

foobar

Python

File: String_append.py<lang python>#!/usr/bin/env python

1. -*- coding: utf-8 -*- #

str = "12345678"; str += "9!"; print(str)</lang>Output:

123456789!

Tcl

String concatenation is a fundamental feature of the Tcl language, and there is also an append that makes concatenation even simpler: <lang tcl>set s "he" set s "${s}llo wo"; # The braces distinguish varname from text to concatenate append s "rld" puts $s</lang>

Output:

hello world

Wart

<lang wart>s <- "12345678" s <- (s + "9!")</lang>