my @matches = 'abcd' =~ /(w)(x)(y)(z)/;
print join ' ', @matches;