RE: What needs patched to fix this ?

["Bharat Mediratta" <bharat@xxxxxxxxxx>]

> Actually it is the value returned from the C library, not really a
> problem with perl. I agree with the sloppiness comment though.

It's not a bug in the libraries -- it's a bug in my code (I agree with
the sloppiness comment :-)

The fix is rather simple.  Attached is a patch for PilotMgr.pm.

-Bharat

*** PilotMgr.pm.orig    Sat Jan  1 11:39:34 2000
--- PilotMgr.pm Sat Jan  1 11:39:52 2000
***************
*** 2635,2641 ****
      $TZ .= ' ' unless $TZ eq '';

      $mon++;
!     return sprintf("%02d/%02d/%02d %2d:%02d:%02d",
                   $mon, $mday, $year, $hour, $min, $sec);
  }

--- 2635,2642 ----
      $TZ .= ' ' unless $TZ eq '';

      $mon++;
!     $year += 1900;
!     return sprintf("%02d/%02d/%04d %2d:%02d:%02d",
                   $mon, $mday, $year, $hour, $min, $sec);
  }
------------------------------------------------------------------------
***********************************************************
*             This is a public mailing list!              *
* Please do not publish Sun proprietary information here! *
*        -  -  -  -  -  -  -  -  -  -  -  -  -  -         *
*             http://www.moshpit.org/pilotmgr             *
***********************************************************