test.icl


1
2
3
4
5
6
7
8
9
10

module test

import StdEnv
import Regex
import Data.Maybe

Start = map (fromJust o (match rgx zero)) ["hello", "abc", "aXz"]
where
    (Just rgx) = toRegex REG_EXTENDED "^a[a-z]*$"