Velocity Reviews > Perl > how to get tomorrow date using Date::CALC

how to get tomorrow date using Date::CALC

Bob
Guest
Posts: n/a

 09-01-2005
How to convert \$tomorrow back to YY-MM-DD format?
What is the inverse of Date_to_Days ?

... perl2.pl ---------------------------
use strict; use warnings; use Date::Calc qw(:all);

my (\$yr2, \$mon2, \$day2, \$tomorrow); my (\$year, \$month, \$day);
\$yr2 = 2005; \$mon2 = 3; \$day2 = 20;

print (" date- year: \$yr2 month: \$mon2 day:\$day2 \n");
\$tomorrow = Date_to_Days(\$yr2,\$mon2,\$day2) + 1;
print ("tomorrow: \$tomorrow \n");

(\$year,\$month,\$day) = Today([\$tomorrow]);
print ("tommorow- year: \$year month: \$month day:\$day \n");
------------------------------------------------------------------

output ------------------------------------
D:\edu\lrn\perl\date>perl date2.pl
date- year: 2005 month: 3 day:20
tomorrow: 732026
tommorow- year: 2005 month: 9 day:1

Paul Lalli
Guest
Posts: n/a

 09-01-2005
Bob wrote:
> How to convert \$tomorrow back to YY-MM-DD format?
> What is the inverse of Date_to_Days ?

Did you even *try* to look for this answer on your own? Say, in the
documentation for the function you're using, of the module you're
using?

Straight out of perldoc Date::Calc's Date_to_Days() section :
In order to convert the number returned by this function back into a
date, use the function "Add_Delta_Days()" (described further below), as
follows:

\$days = Date_to_Days(\$year,\$month,\$day);
(\$year,\$month,\$day) = Add_Delta_Days(1,1,1, \$days - 1);

people around the world to read documentation to you.

> .. perl2.pl ---------------------------
> use strict; use warnings; use Date::Calc qw(:all);
>
> my (\$yr2, \$mon2, \$day2, \$tomorrow); my (\$year, \$month, \$day);
> \$yr2 = 2005; \$mon2 = 3; \$day2 = 20;

GAAAH. What do you have against newlines?

>
> print (" date- year: \$yr2 month: \$mon2 day:\$day2 \n");
> \$tomorrow = Date_to_Days(\$yr2,\$mon2,\$day2) + 1;
> print ("tomorrow: \$tomorrow \n");
>
> (\$year,\$month,\$day) = Today([\$tomorrow]);

What made you think the Today() function takes a number of days as an
argument? The docs say:
========================================
# (\$year,\$month,\$day) = Today([\$gmt]);

<...>

If the optional (boolean) input parameter "\$gmt" is given, a "true"
value ("1") will cause "gmtime()" to be used instead of "localtime()",
internally, thus returning Greenwich Mean Time (GMT, or UTC) instead of
local time.
=======================================

*today*'s date.

Paul Lalli

 Posting Rules You may not post new threads You may not post replies You may not post attachments You may not edit your posts BB code is On Smilies are On [IMG] code is On HTML code is OffTrackbacks are On Pingbacks are On Refbacks are Off Forum Rules

 Similar Threads Thread Thread Starter Forum Replies Last Post Edward A. Falk C Programming 1 04-04-2013 08:07 PM craig Java 0 04-10-2008 04:37 PM craig Java 0 04-10-2008 04:19 PM Peter Grison Java 10 05-30-2004 01:20 PM Fran?ois Laroche Javascript 17 05-28-2004 02:51 AM