my $str = 'Foo';
$str .= 'bar';
print $str;