print LOG '[' . scalar localtime . "] $log : @data \n";