jeremyheiler

;; A data-oriented approach.

;; Basic SMTP. Falls back to HELO if Extended SMTP isn't supported.

(def script
  [[:CONNECT ["server.example.com" 587]]
   [:EHLO ["client.example.com"] :on-reply {502 [:HELO ["client.example.com"]]}]
   [:MAIL ["[email protected]"]]
   [:RCPT ["[email protected]"]]
   [:RCPT ["[email protected]"]]

jeremyheiler

public ItemProcessor extends IterativeProcessor<String> implements Processor {
    
    @Override
    public List<String> getItems(Request req) {
        return req.getParameters("items");
    }
    
    @Override
    public void processItem(Request req, String item) {
        Database.saveItem(item);

jeremyheiler

@Entity
public class Foo{

	@Id
	public int id;
}

jeremyheiler

(defn pe1 [max]
  (reduce +
    (union
      (set (range 0 max 3))
      (set (range 0 max 5)))))