Too bad Perl doesn't have the strftime function. If you want something really nice, how about implementing that, or binding to C's version via XS?

I think you could use sprintf with things like %02d instead of the loop to add leading zeros, and instead of concatenating everything together in $tstamp.

Check out Time::localtime. It does what you do on the hash assignment of localtime.

The %months=reverse(%months) bothers me. You're changing it each time the function is called, flipping it back and forth. That seems fishy. But, why not set up the lookup the way you need it in the first place?

—John


In reply to Re: formatted output of localtime() by John M. Dlugosz
in thread formatted output of localtime() by s0ttle

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.