Created
October 11, 2019 18:17
-
-
Save lumie1337/70323cc674040f0b67df5a8e635db25b to your computer and use it in GitHub Desktop.
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
; type annotation, read String -> Maybe String | |
(>fdef number [s] [string? => (? string?)]) | |
(def number (comp second (partial re-find #"^1?([2-9]\d{2}[2-9]\d{6})$") #(str/replace % #"[\D]" ""))) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment