* (scan "(a)*b" "xaaabd")
  1
  5
  #(3)
  #(4)
  * (scan "(a)*b" "xaaabd" :start 1)
  1
  5
  #(3)
  #(4)
  * (scan "(a)*b" "xaaabd" :start 2)
  2
  5
  #(3)
  #(4)
  * (scan "(a)*b" "xaaabd" :end 4)
  NIL
  * (scan '(:GREEDY-REPETITION 0 NIL #\b) "bbbc")
  0
  3
  #()
  #()
  * (scan '(:GREEDY-REPETITION 4 6 #\b) "bbbc")
  NIL
  * (let ((s (create-scanner "(([a-c])+)x")))
      (scan s "abcxy"))
  0
  4
  #(0 2)
  #(3 3)
  * (register-groups-bind (fname lname (#'parse-integer date month year))
        ("(\\w+)\\s+(\\w+)\\s+(\\d{1,2})\\.(\\d{1,2})\\.(\\d{4})" "Frank Zappa 21.12.1940")
      (list fname lname (encode-universal-time 0 0 0 date month year)))
  ("Frank" "Zappa" 1292882400)
  * (all-matches-as-strings "\\w*" "foo bar baz")
  ("foo" "" "bar" "" "baz" "")
  * (split "\\s+" "foo   bar baz
  frob")
  ("foo" "bar" "baz" "frob")
  * (regex-replace-all "(?i)fo+" "foo Fooo FOOOO bar" "frob" :preserve-case t)
  "frob Frob FROB bar"
  * (regex-apropos "mult\\w+-val\\w+" :cl)
  MULTIPLE-VALUE-LIST [macro]
  MULTIPLE-VALUE-BIND [macro]
  MULTIPLE-VALUE-PROG1 [special operator]
  MULTIPLE-VALUES-LIMIT [constant] value: 536870911
  MULTIPLE-VALUE-SETQ [macro]
  MULTIPLE-VALUE-CALL [special operator]