Concatenate similar data in array

Hello, my logic is really bad, here is I want to do.

my @list = qw(a b a a d e e );

I want to compact the array by concatenating the adjacent vowels and consonant together, like for the above it should become,

my @list2 = qw(ab aa d ee);

How do I get the @list2 ? Thanks.

Send instant messages to your online friends