@result = $temp =~ m/(blaa)(blaaa) .... (blaa)/;