Note:

To be able to iterate using next_match, the perl pattern must be global i.e., it must have the modifier `g' at the end ( e.g., m/a.b*/g). Otherwise, next_match simply fails and only one (first) match will be returned.