Select Code to Download

my $string = "abcdefghi";
my @fields = split /(?=.{3})/, $string;

my @fields = split /(?(?{pos() % 3})(?!))/, $string;