date manipulation

vivapl has asked for the wisdom of the Perl Monks concerning the following question:

In need of wisdom!

Need advise on how to calculate a new date. Eg: I need to retrieve tomorrows date or after.

Currently I'm plating with localtime but not getting anywhere.

My ultimate goal is to pass the function number of days and be able to get the date ahead by that number

Any help would be greatly appreciated

Comment on date manipulation Download Code

Replies are listed 'Best First'.
Re: date manipulation by borisz (Canon) on Feb 04, 2004 at 22:03 UTC
`my $date_as_string = localtime(time() + $days * 246060 ); print $date_as_string;` [download] Boris	[reply] [d/l]
Re: date manipulation by Abigail-II (Bishop) on Feb 04, 2004 at 22:34 UTC
`use Date::Calc;` [download] for 98% of the cases. `use Date::Manip;` [download] for the rest. Abigail	[reply] [d/l] [select]
Re: Re: date manipulation by Trimbach (Curate) on Feb 05, 2004 at 04:06 UTC
Yeah. What Abigail said. Doing simple math on dates works ok most of the time... until the day comes when "the next day at this time" isn't 24 hours away (think daylight savings time.) That sort of thing will bite you one day... much better to rely on a module to remember that stuff for you. Gary Blackburn Trained Killer	[reply]
Re: date manipulation by jonadab (Parson) on Feb 05, 2004 at 05:16 UTC
`use DateTime; sub dateahead { my ($daystoadd) = @_; my $dt = DateTime->now()->add( days => $daystoadd); # What form do you want the result returned in? return $dt->date(); # This, perhaps? return $dt; # Or a DateTime object maybe? }` [download] `$;=sub{$/};@;=map{my($a,$b)=($_,$;);$;=sub{$a.$b->()}} split//,".rekcah lreP rehtona tsuJ";$\=$ ;->();print$/` [download]	[reply] [d/l] [select]
Re: date manipulation by vivapl (Acolyte) on Feb 04, 2004 at 22:08 UTC
Thanks!, Worked just the way I was looking for!	[reply]