while( $string =~ m/$re/g ) {
    ## process all matches one at a time
}