select OUT; $| = 1; print OUT '';