Skip to content
Create a gist now

Instantly share code, notes, and snippets.

@dvanhorn /3.rkt secret
Created Aug 27, 2011

#lang racket
(define str
;; put the large string from src code here.
(apply string
(map (λ (s) (string-ref s 4))
(regexp-match* #rx"[^A-Z][A-Z][A-Z][A-Z][a-z][A-Z][A-Z][A-Z][^A-Z]"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.