my ( $uu1, $uu2 ) = $uuid =~ /(\C{4})(\C+)/;