my $msg = 'Hallo X!';
substr($msg, 6, 1) = 'Welt';
say $msg;