Anscheinend suchst du in dem Fall eher sowas wie:

Quote

@array = $string =~ m/((?:[^\sQ]+)|(?:Q))/g;

\n\n

<!--EDIT|pKai|1115910031-->