IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Modules Perl Discussion :

Comment avoir tous les debut-find de semaines pour chaque mois


Sujet :

Modules Perl

  1. #1
    Membre régulier
    Profil pro
    Inscrit en
    Juillet 2005
    Messages
    134
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2005
    Messages : 134
    Points : 107
    Points
    107
    Par défaut Comment avoir tous les debut-find de semaines pour chaque mois
    Bonjour,

    j'ai esseyé de comprendre comment marche ParseRecur mais pas moyen,
    j'ai en entrée une date de debut et une date de fin, utilisant cela je souhaite avoir (via parserecur ou autre) tout les lundi du mois de l'année donnée en param.

    exemple : -start 02/01/2008 -end 02/28/2008
    resultat :

    02/04/2008 => lundi
    02/11/2008 => lundi
    02/18/2008 => lundi
    02/25/2008 => lundi

    Merci par avance de votre aide
    Cordialement,

  2. #2
    Expert éminent
    Avatar de Jedai
    Homme Profil pro
    Enseignant
    Inscrit en
    Avril 2003
    Messages
    6 245
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Côte d'Or (Bourgogne)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Avril 2003
    Messages : 6 245
    Points : 8 586
    Points
    8 586
    Par défaut
    Tu peux utiliser DateTime, tu as un exemple dans les sujets "importants" du forum.

    --
    Jedaï

  3. #3
    Membre régulier
    Profil pro
    Inscrit en
    Juillet 2005
    Messages
    134
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2005
    Messages : 134
    Points : 107
    Points
    107
    Par défaut
    Merci Jedai

    c'est bon voila le code pour ceux qui cherchent la même chose :

    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
     
     
    #!/usr/bin/perl -w
     
    use DateTime;
    use DateTime::Event::Recurrence;
     
    #affichage de tous les lundi entre l'interval (1 : lundi  / 7 : dimanche)
    my $daily_set = DateTime::Event::Recurrence->weekly(days=>1);
     
    #Affichage de tout les jours entre l'interval
    #my $daily_set = DateTime::Event::Recurrence->daily;
     
    # definition de l'interval
    my @days = $daily_set->as_list(
      start => DateTime->new( year => 2008, month => 02, day => 1 ),
      end => DateTime->new( year => 2008, month => 03, day => 1 ),
    );
     
    #Affichage du resultat
    foreach $my_day (@days){
            print $my_day."\n";
    }
    Merci encore pour ton aide.
    Cordialement,

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Sélectionner les 15 plus grandes valeurs pour chaque mois
    Par Monkey_D.Luffy dans le forum Requêtes et SQL.
    Réponses: 2
    Dernier message: 24/06/2009, 11h50
  2. Réponses: 3
    Dernier message: 08/08/2004, 22h35
  3. [String] comment virer tous les espaces vides ?
    Par Alec6 dans le forum Langage
    Réponses: 6
    Dernier message: 26/07/2004, 15h27
  4. [Tomcat] Comment supprimer tous les logs ?
    Par Soulsurfer dans le forum Tomcat et TomEE
    Réponses: 8
    Dernier message: 11/05/2004, 17h35
  5. Réponses: 4
    Dernier message: 16/08/2003, 14h21

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo