Regexps

Idio uses the POSIX regex(7) regular expression primitives regcomp and regexec.

You can use them directly or commonly in variations on the case expression.

regcomp defaults to REG_EXTENDED so there is an additional REG_BASIC flag to disable REG_EXTENDED.

regexec has an extra REG_VERBOSE flag where the elements in the results array are lists of the matched sub-expression, its starting offset and ending offset (suitable for substring).

regex-case

regex-case which works like a simplified case except the clause “conditions” are regular expressions to be matched.

If the regular expression matches, regex-case then supplies the consequent expression with the result of the call to regexec as the variable r, an array. r.0 is the whole of the matched string, r.1 is the first matched sub-expression, r.2 the second matched sub-expression, etc..

simple-regex-case.idio
(regex-case
 (read-line)
 ("^([[:alpha:]][[:alnum:]_]*)=(.*)" {
   printf "%s is '%s'\n" r.1 r.2
 })
 (else {
   printf "no match\n"
 }))

Here we need to input a line for read-line:

$ idio simple-regex-case
foo=bar
foo is 'bar'

pattern-case

Similarly, pattern-case provides something like the shell’s case statement’s Pattern Matching where * and ? are really .* and . respectively.

Note that your pattern string is implicitly anchored to the start and end.

simple-pattern-case.idio
for try in '(1 2 3 4) {
  (pattern-case
   (read-line)
   ("foo*" {
     printf "%s is foo-ish\n" r.0
   })
   ("bar?" {
     printf "%s is bar-ish\n" r.0
   })
   (else {
     printf "no match\n"
   }))
}

Four lines of input, this time:

$ idio simple-pattern-case
foo diddly-dee do
foo diddly-dee do is foo-ish
I'm feeling foo
no match
barb
barb is bar-ish
barbarosa
no match

Last built at 2024-11-21T07:11:46Z+0000 from 77077af (dev) for Idio 0.3