open( OUT, ">blah.csv" ) or die "cant open out $!";
select OUT; $|++;