#!/usr/bin/env emacs --script

(while (princ "SPAM\n"))