Shell Programming and Scripting

date '+%j'

 # date -d "2008-01-02" +%j
002

DOY=`date -d $year-$month-$day +%j`

$DOY=`date -d $year-$month-$day +%j`;

$ cat ./date_test.pl
#!/usr/bin/perl

use strict;
use warnings;
use POSIX qw(strftime);
use Time::Local;

#If you just want the julian of the current system date
my $x;

$x = strftime("%j", localtime());

print "x = $x\n";

#If you want the julian of a specific date, let's say 2008-12-10
my $testdate;
my $yyyy = 2008;
my $mm   = 12;
my $dd   = 10;

$testdate = timelocal(0, 0, 0, $dd, $mm-1, $yyyy);
$x = strftime("%j", localtime($testdate));
print "x = $x\n";

exit 0;


$ ./date_test.pl
x = 351
x = 345

$ date -d "2008-12-16" +%j
351

$ date -d "2008-12-10" +%j
345

$ doy=$(printf "%(%j)T" "2008-12-16")
$ print $doy
351
$ doy=$(printf "%(%j)T")
$ print $doy
352
$