I have a poll whose results I want to reset automatically every week. The way I would normally do this would be to get the week number (1 to 52) using formatting of the unix date command, save that along with my poll data, and when someone adds new poll data, compare the current week with the stored week -- if they're different, reinitialize the poll results.

That's what I'd LIKE to do.

But I'm writing for a client who has a stock build of ActiveState on an NT server, so I can't do a system call (unless there's a nice DOS equivalent of date that can give me week number and not just "August 29, 2000"). Likewise, it doesn't look like Date::Calc is part of the standard install for ActiveState perl, and even if it were, it would want a system_clock() call of some sort which may or may not be interpreted correctly by NT. (I haven't gotten that far, since Date::Calc wasn't installed anyway...)

So how would YOU approach my particular problem?

Help much appreciated.

In reply to Date calculations in Perl for Win32 by cei

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.