Connaître le jour en rapport avec une date Résolu

Question

Bonjour,
je voudrais trouver un script qui me retourne le jour par rapport à une date donnée.
Exemple, aujourd'hui nous sommes le 4 mars, le résultat doit être 4 puisque c'est un jeudi.

J'utilise le code suivant mais cela fonctionne avec la fonction "date", comment y passer une variable ???
numjour= $(date +%w) 

if test $numjour -eq 1
then

      echo "lundi"

elif test $numjour -eq 1

        echo "mardi"
fi
Mon Shell est #!/bin/ksh

Merci d'avance car je ne trouve rien du tout !

dubcek · Accepted Answer

ce script n'utilise ni perl, ni date mais la commande cal, qui devrait être la même sur Solaris, essaye
$ $ cal 03 2010
     March 2010     
Su Mo Tu We Th Fr Sa
    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 30 31         
                    
$ ./day 28/2/2010
dimanche
$ ./day 6/3/2010
samedi
$ ./day 04/7/1996
jeudi
$ ./day 30/11/2003
dimanche
$ ./day 04/9/2003
jeudi
$ ./day 6/6/1944
mardi
$ 
$ cat day
#!/bin/bash

set $(echo $1 | sed -e 's+/+ +g')
cal $2 $3 |nawk -v d=$1 'BEGIN{split("dimanche lundi mardi mercredi jeudi vendredi samedi",j)}
NR>2 {sub("^0","",d) ; for(n=1;n<8;n++)if(substr($0,1+((n-1)*3),2)+0 == d)exit} ; END{print j[n]}'
$

jipicy · Answer

Salut,

Pourquoi te compliquais la vie ?

date +%A
Non ? ;-))

OlivrT · Answer

Bonjour,
ben non ! Je réexplique car je ne suis peut-être pas clair.

Je voudrais trouver le jour que représente une date.
Donc pour reprendre mon exemple, si je passe la date du 4 mars, je devrais trouver jeudi.
Exemple : numjour= $($MaVariable +%w)  sauf que ça ne marche pas :-(

Là vous me donner à nouveau la fonction date, mais moi je voudrais remplacer "date" par une variable qui contient une date.
D'ailleurs j'ai une seconde question pour cela, comment écrit-on dans une variable Unix une valeur au format date ? Exemple en Access c'est #2008/24/12#, en sql server c'est '2008-30-02', etc, ... mais en Unix c'est comment ?

Suis-je clair ?

jipicy · Answer

Re- 

Le "man date" t'aurait dit tout &ccedil;a... 
Format de date AAA/MM/JJ ou AAA-MM-JJ

date -d '2008/12/24' +'%A' 
mercredi
;-)) 

&Eacute;dit : Format de date

$ man woman 
Il n'y a pas de page de manuel pour woman.

OlivrT · Answer

Re,
fonctionne pas, j'ai le message suivant :
Mon code :

#!/bin/ksh
clear
madate=2008/12/24
jour=`date -d '$madate' +'%A'`
echo "Num Jour ? $jour"
exit

J'ai essayé ceci également :

#!/bin/ksh
clear
madate="2008/12/24"
jour=`date -d $madate +'%A'`
echo "Num Jour ? $jour"
exit


Résulat : 

date: illegal option -- d
usage:  date [-u] mmddHHMM[[cc]yy][.SS]
date [-u] [+format]
date -a [-]sss[.fff]

Pourtant j'ai trouvé cet argument dans une page, mais j'ai aucune idée de pourquoi ça ne fonctionne pas

OlivrT · Answer

Je travaille sous Unix , sauf erreur de ma part en Solaris 10 ?
Mon Shell est KSH

Je ne suis pas expert en Bash comme tu peux t'en douter, il existe une commande qui pourrait répondre plus précisément ?

OlivrT · Answer

En effet 'dubcek' m'a déjà dépanné sur un autre problème de date et justement en Perl.
Comment je fais pour lui écrire directement ?

OlivrT · Answer

lol, merci m'sieur

dubcek · Answer

hello
avec strptime, on décrit le format de date que l'on a : "%Y/%m/%d"
$ date=2010/3/5
$ perl -e 'use  Time::Piece ;my $t = Time::Piece->strptime($ARGV[0],"%Y/%m/%d");print $t->strftime("%u
")' $date
5
$ 
$ date=2010/8/7
$ perl -e 'use  Time::Piece ;my $t = Time::Piece->strptime($ARGV[0],"%Y/%m/%d");print $t->strftime("%u
")' $date
6
$ date=2008/12/24
$ perl -e 'use  Time::Piece ;my $t = Time::Piece->strptime($ARGV[0],"%Y/%m/%d");print $t->strftime("%u
")' $date
3
$

OlivrT · Answer

Salut dubceck,
merci pour ta réponse mais sans te vexer elle n'est pas en rapport avec ma question de départ :-(

Moi je cherche comment trouver une valeur qui m'indiquera que par exemple le 28/02/2010 c'est un dimanche.
Mon shell est Ksh et je travaille sous Unix solaris 10.

Est-ce que tu aurais quelque chose pour moi ?

Jadis tu m'avais envoyé le code suivant, qui fonctionne très bien et qui me retourne la date au format désiré avec x jours en plus ou en moins :
DAY=0
TODAY_YYYYMMDD=$(perl -e 'use POSIX qw(strftime);  print strftime "%Y%m%d", localtime(time()+3600*24*$ARGV[0])' -- $DAY)

Tu n'aurais pas le même truc qui me retournerai : 1 pour un lundi, 2 pour un mardi MAIS avec une date fournit par variable ?

bàt

OlivrT · Answer

Bon j'ai écrit ceci et j'ai le message d'erreur suivant :

date1=2010/02/28
result=$(perl -e 'use  Time::Piece ;my $t = Time::Piece->strptime($ARGV[0],"%Y/%m/%d");print $t->strftime("%u
")' $date)
echo "resultat : $result"

Messages : 

Can't locate Time/Piece.pm in @INC at -e line 1.
BEGIN failed--compilation aborted at -e line 1.

dubcek · Answer

je voudrais trouver un script qui me retourne le jour par rapport à une date donnée.Exemple, aujourd'hui nous sommes le 4 mars, le résultat doit être 4 puisque c'est un jeudi. 
sic
Moi je cherche comment trouver une valeur qui m'indiquera que par exemple le 28/02/2010 c'est un dimanche. 
$ date=28/2/2010
$ perl -e 'use  Time::Piece ;my $t = Time::Piece->strptime($ARGV[0],"%d/%m/%Y");print $t->strftime("%A
")' $date
Sunday
$

OlivrT · Answer

#!/bin/ksh
clear
date=28/2/2010
result=$(perl -e 'use  Time::Piece ;my $t = Time::Piece->strptime($ARGV[0],"%d/%m/%Y");print $t->strftime("%A
")' $date)

echo "resultat : $result"

Message d'erreur :

Can't locate Time/Piece.pm in @INC at -e line 1.
BEGIN failed--compilation aborted at -e line 1.
resultat :

dubcek · Answer

Solaris perl ne connait pas Time::Piiece, as-tu un compilateur C ? $ cat date.c #include #include main(int argc, char **argv) { struct tm tm; char buf[128]; strptime(argv[1],"%d/%m/%Y", &tm); strftime(buf, sizeof(buf), "%A", &tm); printf("%s ", buf); } $ make date cc date.c -o date $ ./date 28/2/2010 Sunday $

dubcek · Answer

avec
 perl -e 'print "@INC"' 
on peut voir quelles librairies Solaris perl utilise par defaut

OlivrT · Answer

pas de compliateur C  :-(((

Merci pour la version, le résultat est : /app/gnu/lib/perl5/sun4-solaris /app/gnu/lib/perl5

Je suis coincé :-/ 
Je vous explique ce à quoi je désire aboutir.
Chaque fin de mois nous recevons un fichier très volumineux.
La date de réception variera selon le joue oeuvré. Si le dernier jour du mois tombe entre lundi et vendredi, il me suffit de trouver cette date et le tour est joué.
Par contre, et c'est là que je suis coincé, si le dernier jour du mois tombe un dimanche, comme par exemple le 28 février 2010, nous aurions reçu le fichier le 26 car le 26 c'est le dernier jour oeuvré du mois (nous ne travaillons pas le samedi). Donc voilà pourquoi je désire connaître à quel jour correspond une date ...
Si quelqu'un a une idée, il est le bienvenu !

Merci en tout cas.

OlivrT · Answer

dubcek, j'ai peut-être parlé trop vite, regarde le code ci-dessous. Il permet de retirer ou d'ajouter x mois à une valeur yyyymm. Ca ressemble bien à du C ça non ? Mais j'ai aucune idée comment refaire ce que tu as écrit :-/ Le fichier s'appelle 'ajouter-mois' sans extension et je l'utilise comme suit : MOIS=201003 MOIS=`ajouter-mois ${MOIS} -1` Le résultat sera 201002 #!/usr/bin/nawk -f BEGIN { Mois = ARGV[1]; Nb = ARGV[2]; Annee = int(Mois / 100); NumMois = Mois - Annee * 100; if(Nb > 0) { while(Nb > 0) { if(NumMois < 12) NumMois++; else { NumMois = 1; Annee++; } Nb--; } } else { while(Nb < 0) { if(NumMois > 1) NumMois--; else { NumMois = 12; Annee--; } Nb++; } } printf("%2.2d%2.2d ", Annee, NumMois); }

dubcek · Answer

regarde dans /usr si il n'y a pas d'autres librairies perl
find /usr -name "perl*" -type d -ls

dans /app/gnu/ n'y a-t-il pas la commande GNU date
find /app/gnu/ -name date -ls

OlivrT · Answer

Celles à qui j'ai accès sont :
82688 1 drwxr-xr-x 7 root bin 512 Feb  5  2009 /usr/sfw/lib/webmin/perlmod
13987 1 drwxr-xr-x 7 root bin 512 Feb  5  2009 /usr/perl5
79886 1 drwxr-xr-x 3 root bin 512 Feb  5  2009 /usr/apache/perl5
79902 1 drwxr-xr-x 2 root bin 512 Feb  6  2009 /usr/apache/perl5/5.8.4/sun4-solaris/auto/Apache/include/modules/perl
77490 1 drwxr-xr-x 8 root bin 512 Feb  6  2009 /usr/apache2/lib/perl

dubcek · Answer

dans /app/gnu/ n'y a-t-il pas la commande GNU date
find /app/gnu/ -name date -ls

OlivrT · Answer

Oui,
sauf que apparement je n'y ai pas accès :
find: cannot read dir /app/gnu/lib/gcc-lib/sparc-sun-solaris2.4: Permission denied
find: cannot read dir /app/gnu/lib/g++-include/gen: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/sun4-solaris/auto: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/sun4-solaris/Tk: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/auto/Calendar: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/auto/Data: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/auto/PDA: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/auto/Tk: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/PDA: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/Calendar: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/Data: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/Tk: Permission denied

dubcek · Answer

demande au sysadmin d'avoir accès à ces librairies perl
qu'y a-t-il dans /app/gnu ? ls /app/gnu

OlivrT · Answer

Pas accès :-(

find: cannot read dir /app/gnu/lib/gcc-lib/sparc-sun-solaris2.4: Permission denied
find: cannot read dir /app/gnu/lib/g++-include/gen: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/sun4-solaris/auto: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/sun4-solaris/Tk: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/auto/Calendar: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/auto/Data: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/auto/PDA: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/auto/Tk: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/PDA: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/Calendar: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/Data: Permission denied
find: cannot read dir /app/gnu/lib/perl5.004/Tk: Permission denied

Bon je suis pas du tout un expert mais l'exemple que j'ai trouvé 'ajouter-mois', ça t'aide pas pour retourner le numéro du jour ?

OlivrT · Answer

bin   info  lib   man

les serveurs sont hébergés à Paris et moi je suis à Bruxelles, ils sont 10000 à l'IT ... dans 3 mois j'aurais une réponse :-)

OlivrT · Answer

Bon,
j'ai un serveur qui rend l'âme là, je vais devoir m'absenter. On voit ça tout à l'heure ou lundi si t'es dispo.
Merci 1000 fois à touts en tout cas;

dubcek · Answer

autre solution, tu vas là http://www.sunfreeware.com/programlistsparc10.html#coreutils
tu charges coreutils-8.2-sol10-sparc-local.gz  et tu extrais date
tu auras la commande GNU date avec l'option --d
edit: j'ai  dit une betise, c'est un package à installer avec pkgadd

OlivrT · Answer

Salut,
je pense qu'on est sur la bonne voie. cal 03 2010 m'affiche bien le calendrier dans son entièreté.
Ton exemple à partir de"#!/bin/bash", comment je fais pour sortie le résultat dans une variable stp ?

OlivrT · Answer

Ok, c'est ce que j'ai fait mais comment rien ne s'affiche je suppose que je fais une erreur quelque part, pourriez-vous me dire quelle est-elle ?

madate=28/2/2010
mois=02
annee=2010

set $(echo $madate | sed -e 's+/+ +g')

result=$(cal $mois $annee |nawk -v d=$madate 'BEGIN{split("dimanche lundi mardi mercredi jeudi vendredi samedi",j)}
NR>2 {sub("^0","",d) ; for(n=1;n<8;n++)if(substr($0,1+((n-1)*3),2)+0 == d)exit} ; END{print j[n]}')
echo "resultat : $result"
exit

OlivrT · Answer

comme avec avec la variable je n'ai pas d'erreur mais je n'ai rien qui s'affiche non plus :-/

OlivrT · Answer

???? C'est affiché à la ligne dans le forum par manque de place !!!!!!!!!!!!!!!!
Tu as essayé toi de ton côté ?

dubcek · Answer

-v d=$madate
c'est faux

$1 = JJ/MM/AAAA, puis après le set $1 le jour, $2 le mois, $3 l'année
set $(echo $1 | sed -e 's+/+ +g'
cal $2 $3 |nawk -v d=$1 
donc
set $(echo $madate | sed -e 's+/+ +g'
cal $2 $3 |nawk -v d=$1 ...

OlivrT · Answer

Ca maaaaaaaaaaaaaaaaaaaaaaaaaaaaarche ! :-)) SUPER ! Merci les gars

Connaître le jour en rapport avec une date - Page 2

Discussions similaires

Newsletters