I get the same result on Solaris 9. I'm a little baffled by it, too, because at line 10, right before the print statement, $period has this structure: 
  DB<1> x $period
0  Date::Set=HASH(0x5ef384)
   'dtstart' => undef
   'fixtype' => 1
   'list' => ARRAY(0x1131ac)
      0  HASH(0x606130)
         'a' => Date::Set::ICal=HASH(0x605d94)
            'epoch' => 20021201
         'b' => Date::Set::ICal=HASH(0x497a74)
            'epoch' => 20021231
         'open_begin' => 0
         'open_end' => 0
   'tolerance' => 0
   'type' => 'Date::Set::ICal'
   'wkst' => 'MO'

[download]
But if I print $period, I get 
  DB<2> p $period
[19700820T172641Z..19700820T172711Z]

[download]
I suggest contacting the developer(s). I also noticed that one of the dependent modules warned about the API being in flux, so there is a possibility that changes in the API broke Date::Set. You might want to try older versions of those.

Good luck.

In reply to Re: Date::Set not returning correct results. by asarih
in thread Date::Set not returning correct results. by the_0ne

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.