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

print $str;