use POSIX 'strftime';

my $day = strftime("%j", localtime(time()));