> On Feb 2, 2018, at 10:23 AM, 'John Clements' via Racket Users 
> <racket-users@googlegroups.com> wrote:
> 
> This macro gets the names in much closer to the corresponding patterns than 
> matching by index, but it doesn’t actually embed the names into the regexp.


If you like keeping the names and patterns together, you could also create an 
association list of the names and subpatterns, and iterate:

#lang racket

(define msg "2018-02-02T11:26:34 someuser some-computername01 233.194.20.110 
something broke")
(with-input-from-string msg
  (thunk
    (for/hash ([(name pat) (in-dict '((date . "[-\\dT:]+")
                                      (username . "\\w+")
                                      (hostname . "[-\\w\\d]+")
                                      (ip . "[\\d\\.]+")
                                      (message . ".+")))])
              (values name (car (regexp-match (pregexp pat) 
(current-input-port)))))))


'#hash((message . #" something broke")
       (date . #"2018-02-02T11:26:34")
       (username . #"someuser")
       (hostname . #"some-computername01")
       (ip . #"233.194.20.110"))

-- 
You received this message because you are subscribed to the Google Groups 
"Racket Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to racket-users+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.

Reply via email to