The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Log::Parallel::Durations - parse duration specifications

SYNOPSIS

 use Log::Parallel::Durations;

 my $job = {
	frequency => 'daily',
	timespan => '30 days',
 };
 my $jd = Time::JulianDay::julian_day(2008, 10, 22);
 my $jd_from_limit = Time::JulianDay::julian_day(2008, 8, 22);
 my $jd_to_limit = Time::JulianDay::julian_day(2008, 12, 14);

 ($timespec, @jd_range) = frequency_and_span($job, $jd, $jd_from_limit, $jd_to_limit);

DESCRIPTION

This is a helper module for the process_logs. It parses duration and frequency specifications.

It understands frequencies:

daily
every 3 days
every week
each month on the 13th
on the 1st each month
on the 1st of each month
every Tuesday
on the 3rd Wednesday of each month

It understands durations:

3 days
1 quarter
2 years

The API meets the needs of process_logs. Given a start time ($jd_from_limit) and an end time ($jd_to_limit) and a particular day ($jd) and a structure that specifies the duration and frequency ($job), it will return undef unless the particular day ($jd) happens to meet the specification. Most jobs are expected to run daily so most of the time this is efficient.

All dates are in Julian Days. Use Time::JulianDay.

See the code for more details.

LICENSE

This package may be used and redistributed under the terms of either the Artistic 2.0 or LGPL 2.1 license.