topic Re: Date Question in Operating System - HP-UX

Date Question

Ryan Clerk — Mon, 13 May 2002 17:39:30 GMT

Hello,

I got so many quick responses to my last question that I think I will try again. This ought to be easy be it has me completely stumped. Is there a way to determine the number of days since some date in the past. For example, how many days since today and Dec. 1, 1960?

TIA, Ryan

Re: Date Question

harry d brown jr — Mon, 13 May 2002 17:44:17 GMT

Use Clay's script:

http://forums.itrc.hp.com/cm/QuestionAnswer/1,,0xd66c50011d20d6118ff40090279cd0f9,00.html

live free or die
harry

Re: Date Question

A. Clay Stephenson — Mon, 13 May 2002 17:54:45 GMT

Actually, this is far from a trivial question but there is a fairly easy solution. Try this:

#!/usr/bin/sh
PREV_DT="12 1 1960"
DIFF=$(($(caljd.pl) - $(caljd.pl ${PREV_DT)))
echo "Diff = ${DIFF}"

Caljd.pl converts a calendar date into a Julian Day and vice versa. With no arguments, it converts today's date to a Julian Day. Caljd.pl -u gives full usage.

I've attached the caljd.pl script but you can also use the shell/awk based 'caljd.sh' script. The arguments are exactly the same. Search the Forums for 'caljd.sh' and you should find a copy. Version 2.05 is the latest.

Regards, Clay

Re: Date Question

Ryan Clerk — Mon, 13 May 2002 18:41:05 GMT

Thanks guys. That worked. I used the caljd.sh version because I don't know Perl.

Re: Date Question

Ryan Clerk — Mon, 13 May 2002 21:06:31 GMT

Hello again,

I'm a little confused. I have been looking at this caljd.sh and I noticed that something appears to be very wrong. There is a function called "JDATE_CAL" that has 11 parameters but is is only called with 3 parameters. I have downloaded the file 3 times but each time the same parameters are missing. The funny thing is that the script seems to work fine. Is this ok?

Please respond, Ryan.

Re: Date Question

A. Clay Stephenson — Mon, 13 May 2002 21:13:12 GMT

Not to worry, Ryan. Your version is fine. That's the standard method of declaring local variables for a function in awk. Any formal paramters in excess of the actual paramters become local variables for that function. By convention, those parameters are set apart by extra whitespace to make it more obvious. If you examine the Perl version, cajld.pl, you will note that those parameter lists match because Perl supports the concept of explicitly declared local variables.

Regards, Clay