Discussion :

[Melvine]

Bonjour,

J'aurai aimé savoir si il existe un module ou comment faire pour calculer tous les prochaine lundi ou mardi .... à partir de la date du jour;

par exemple on est le 05/10/07
je voudrais avoir la date de tous le mardi jusqu'à la fin de l année.

Est ce possible ?

Merci

[Jedai]

DateTime le fait par exemple :

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
18
19
20
21
22
23
24
25
26
27
28
29
#! /usr/bin/perl
use strict; use warnings;
 
use DateTime;
use DateTime::Event::Recurrence;
 
my %num_of_dow;
@num_of_dow{ qw(lundi mardi mercredi jeudi vendredi samedi dimanche) } =
               (1,    2,    3,       4,    5,       6,     7,      );
 
my $wanted_dow = $num_of_dow{lc($ARGV[0])};
 
unless( defined $wanted_dow ) {
  print "Donnez en argument le jour de la semaine, svp.\n";
  exit(1);
}
 
my $next_wanteds = 
  DateTime::Event::Recurrence->weekly( days => $wanted_dow );
 
my $iter_wanteds = 
  $next_wanteds->iterator(
    start => DateTime->today,
    end => DateTime->new( year => (DateTime->now->year + 1) ),
);
 
while( my $dt = $iter_wanteds->next ) {
  print $dt->ymd, "\n";
}

--
Jedaï

[djibril]

en plus de l'explication de jedai, tu as des exemples dans notre FAQ