while (<IN_LOG>) {
   push (@array,$_);
 }
}