On Sun, Jan 11, 2004 at 09:27:09 -0800,
hodges@xprt.net wrote:
> > Is there a way to have perl return day of the month as
> > a 2 digit string or some code to automaticly pad it?
> > I am using
> >
> > # Get current time and date
> > ($mday,$mon,$year)=(localtime(time + (24*60*60)))[3..5];
> > $mon ++;
> > $year +=1900;
> > $dstr1 = "$year-$mon-$mday";
> >
> > Thanks for any ideas,
You could use sprintf in perl to generate the date string.
If you are actually doing the compare in postgres it might be better
to just get the time in seconds since the epoch and cast that to abstime
and then to date.
For example:
area=> select 1073921933::abstime::date;
date
------------
2004-01-12
(1 row)
