Comparer les dates presentes ds un fichier a la date courante

Comparer les dates presentes ds un fichier a la date courante - Perl - Programmation

Marsh Posté le 05-09-2006 à 15:44:56    

Bonjour,
j'aimerais savoir comment faire un script perl qui permettrais de comparer les dates presentes dans un fichier de log avec la date courante
si une des lignes date de la date du jour alors affichage d'un message d'alerte
 
le fichier est formatté de la facon suivante

Code :
  1. 2005/09/06 heure  nom_serveur appli : il manque un ou plusieurs fichiers
  2. 2005/09/06 heure  nom_serveur appli : Probleme lors de la verification de la presence des fichiers
  3. 2005/10/18 heure  nom_serveur appli : il manque un ou plusieurs fichiers
  4. 2005/10/18 heure  nom_serveur appli : Probleme lors de la verification de la presence des fichiers


Message édité par DarkAngel_s le 05-09-2006 à 16:31:43
Reply

Marsh Posté le 05-09-2006 à 15:44:56   

Reply

Marsh Posté le 05-09-2006 à 16:09:55    

un truc dans le genre:

Code :
  1. perl -ne '@date = /(\d{4})\/(\d{2})\/(\d{2})/;@cdate = localtime(time);if($date[0] == $cdate[5]+1900 && int $date[1] == $cdate[4] + 1 && int $date[2] == $cdate[3] ){print "ALERTE:".$_;}' TonFichierDeLog


edit: Si en une ligne ça te plait pas, fais-en un vrai script!


Message édité par anapajari le 05-09-2006 à 16:10:40
Reply

Marsh Posté le 05-09-2006 à 16:48:58    

merci beaucoup ;)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed