#!/usr/local/bin/rep
!#

;; old incantation:
;; #!/bin/bash
;; exec rep "$0" "$@"
;; !#

;; rep-pipe - read and evaluate forms from stdin
;;            to be bound to meta-return/shell-command-on-region in emacs

(let ((text (make-string-output-stream)))
  (copy-stream standard-input text)
  (eval (read-from-string
         (concat "(progn" (get-output-stream-string text) ")"))))