while ($count<=$size){
              rand($.)<1 && ($line=$_);
            print OUT $line;
            $count++;    
            }