print $fh map "$_\n", @dates_now;