let
extract ~rex s =
Re
.get_all (
Re
.exec rex s)