in reply to Re: saving a split pattern
in thread saving a split pattern

just wanted to note the alternative, if the pattern should not be in an extra element:
my @list = split m/(?=[a-z]{2}\d{4})/, $s;
output:
PRELUDE xz3456MIDDLE zy1234POST