#!/usr/bin/perl
# Stupid program to do line buffering, saving up chars until
# a  newline is encountered.  Doing this in C would be a lot
# cheaper, but I've had to use it on a few systems  where  I
# couldn't use a C compiler.  Sigh.

$| = 1;
for (<>) {print}
#for $s (<>) {
#	$l .= $s;
#	print STDERR "< $s\n";
#	print ">$l" if $s =~ /\n/;
#	$l = '';
#}