http://qs321.pair.com?node_id=657745

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

Hello,
The following date calculation is being run from a unix script. It is calculating the incorrect date. We use the calculation to determine a date fro our billing system. The code has been calculating the date correctly until today when it was run to calculate a January 2008 date.
Here is the code:
billdate=`perl -MPOSIX -e 'print strftime( "%y%m", localtime( time + 1 +123200 ) )'`01

It is currently producing 071201 and it should be calculating 080101.

We need this relatively quickly. I would very much appreciate any help whatsoever. You guys are great.
Thanks again

Edit: g0n - code tags and formatting