my ( $month, $day, $time, $host, $service ) = split;