Re: Questions on Optimisation (DateTime::SpanSet and RRDs.pm)

in reply to Questions on Optimisation (DateTime::SpanSet and RRDs.pm)

Does this do what you need? If so, I'm guessing it should do a bit less work than DateTime would..

my ( $minute, $hour, $day, $month, $year, $wday ) =
          ( localtime( $start ) )[ 1, 2, 3, 4, 5, 6 ];
next unless (($wday >= 1) && ($wday <= 5)
            && ($hour >= 8) && ($hour < 18));
[download]

cheers,

Comment on Re: Questions on Optimisation (DateTime::SpanSet and RRDs.pm) Download Code

Replies are listed 'Best First'.
Re^2: Questions on Optimisation (DateTime::SpanSet and RRDs.pm) by smullis (Pilgrim) on Jan 26, 2005 at 14:25 UTC
Thankyou! This is exactly the kind of answer I was looking for... Cheers SM	[reply]

In Section Seekers of Perl Wisdom