my $str = join '; ', $foo, $bar, $baz, $qux;