reg_svr/regtest/printit

   1 #!/bin/csh -f
   2
   3 while (1)
   4         set input = `echo $<`
   5         if ($#input < 2) break
   6
   7         echo $input | cat message.head - message.tail >> lpr.out
   8         echo "\f" >> lpr.out
   9 end
  10
  11 lpr lpr.out