RE: Form Mail replacement

Have been following this thread.
Am not a Perl programmer, just someone who can minimally make out and use
canned scripts.
Shall I assume that the following code will NOT work, found it as part of
version 1.6(I have been using 1.5 for quite a while).

   $year += 1900;
   $date = "$days[$wday], $months[$mon] $mday, $year at $time";

>
> thanks, bill! suits me fine!
>
> > On Thu, 30 Dec 1999, Wiswell, Virginia wrote:
> > > > why not make it last a millenium:
> > > > >
> > > > >            #Y2K Fix
> > > >              $tl[5] = $tl[5]-2000;
> >
> > Not quite right.  $tl[5] contains the number of years since 1900, so:
> >
> > In 1999 it would be 99.  99 - 2000 = -1901
> > In 2000 it would be 100.  100 - 2000 = -1900
> >
> > The following single line will give a correct two digit year
> > between 1900
> > and 9999:
> >
> >       $tl[5] = substr($tl[5]+1900,2,2);
> >
> > Regards,
> > Bill
>
>

HWG: hwg-servers mailing list archives, maintained by Webmasters @ IWA