select STDOUT;
$|=1;

printf "%d testpipe.pl output\n", scalar time();

while(<STDIN>) {
	printf "%d %s", scalar time(), $_;
	printf STDERR "%d YO!\n", scalar time();
}
printf "%d testpipe.pl done\n", scalar time();

exit 5;