let
pmatch ~rex s =
Re
.execp rex s