if ( @results = $line =~ m/(match me)/g ) { # tu was mit @results; dort sind alle treffer nacheinander enthalten }