my $foo = "Foo";
my $bar = "Bar";
my $foo .= $bar;