sub concat { join '', @_ }

my $joined = concat( $first_part, $second_part );