Discussion :

[azur123]

bonjour,

je cherche une expression régulière pour vérifier le format de date dd/mm/yy.

Merci d'avance pour votre aide.

[Philou67430]

Essaye avec Regexp::Common::time

[azur123]

Essaye avec Regexp::Common::time

[6ril23]

Essaye avec Regexp::Common::time

Philou c'est pas un peu sortir l'artillerie lourde pour une simple vérif de format?
est-ce qu'il ne serait pas suffisant de faire: if ( $date =~ /\d{2}\/\d{2}\/\d{2}\// ){}

[-Eks-]

est-ce qu'il ne serait pas suffisant de faire: if ( $date =~ /\d{2}\/\d{2}\/\d{2}\// ){}

il y a un \/ en trop à la fin de la regexp

autrement pour forcer la vérification d'un format de date dd/mm/yy on peut faire une première vérification que les chiffres correspondent à une date plausible :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

/[0-3]\d\/[0-1]\d\/\d\d/

cela évite les dates 99/99/99

mais pour faire une réelle vérification que l'on écrit pas 33/19 en dd/mm, ou tester si un 29/02 est possible par rapport à l'année indiquée (bissextile ou pas), il faudrait, je pense, capturer le contenu et le tester, par exemple avec Time::Local qui est un core module.

Je ne pense pas que Regexp::Common::time puisse faire ce type de vérification (et ce n'est pas un core module).

Cela donnerait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#!/usr/bin/perl
 
use strict;
use warnings;
use Time::Local;
 
my $date = "29/02/96";
if ($date =~ /([0-3]\d)\/([0-1]\d)\/(\d\d)/) {
    eval { timelocal( 0, 0, 0, $1, $2-1, $3 ) };
    if ($@) {
        print("Time is bad: $@");
    } else {
        print "Time is good\n";
    }
} else {
    print("wrong time format\n");
}

Eks

[Lolo78]

Vu la question de départ, je partirais sans doute sur une simple regex comme celle proposée par Cyril ou, mieux, la version un peu plus discriminante de -Eks-. Souvent j'ai juste besoin de vérifier que j'ai bien reçu quelque chose ressemblant à une date (et pas une adresse IP, une URL, un IMSI ou un numéro de téléphone), si ça a bien l'air d'une date, je peux assumer qu'elle est certainement une vraie date.