$_ = "abc*def*ghi";

my @matches;
m/(?: ([^*]+) (?{ push @matches, $^N}) \*?)+/x;

print join('|', @matches), $/;