BUG??? Perl is v5.8.3 built for PA RISC 1.1. Machine is HP superdome with at least 15 processors assigned and min 10Gb of memory. I'm comparing dates in seconds by making calls to timelocal to get value in seconds using the following code: 
use time::local;
$pepoch=timelocal(1,1,1,$pday,$pmon,$pyear);

[download]
I print the three variables before each call and the results (in seconds) after each call. Out of 1323 lines of data, 13 calls return invalid results. One example is a call using 1,1,1,30,8,104 that returns 2613361 seconds instead of 1096520461 seconds. All of the bad returns have a $pmon value of 8 and $pyear value of 104. Only the first call using a date in September 2004 is returned correctly. All other bad returns are for different dates within the same year and month. Incorrect values are consistant as far as I can tell. IE.. first call for 8/30/04 returns 1096520461. Second and third calls return 2613361. Other calls of similiar dates spread over 3 years in different months appear correct. Months are correct starting with 0, etc. This bug appeared after a system & perl version upgrade. Code worked for years without error on older version of Perl & HP/UX. We are currently running the latest version of PERL suppored by HP. Any ideas?

In reply to time::local by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.