my $this = "This";
my $that = "That";
my $the  = "The";
my $other = "Other";
my $string = join "", $this, $that, $the, $other;
# $string now contains "ThisThatTheOther".