my @trib= split /(?<=\G...)/, $_;