(use matchable)

(match (command-line-arguments)
  (("foo") (print "foo"))
  (("bar") (print "bar"))
  (else    (print "no command line arguments given")))