The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Time::Duration::Parse::More - parse natural language time duration expressions

VERSION

version 0.003

SYNOPSIS

    use Time::Duration::Parse::More;

    my ($seconds);
    $seconds = parse_duration('1 minute, 30 seconds'); ## 90
    $seconds = parse_duration('1 minute plus 15 seconds'); ## 75
    $seconds = parse_duration('1 minute minus 15 seconds'); ## 45
    $seconds = parse_duration('1 day minus 2.5 hours and 10 minutes plus 15 seconds'); ## 76815
    $seconds = parse_duration('minus 15 seconds'); ## -15

DESCRIPTION

The module parses a limited set of natural language expressions and converts them into seconds.

It is backwards compatible with Time::Duration::Parse (passes the same test cases), but adds more expressions and memoization.

At the moment, the module is limited to english language expressions.

Rules

The following rules are used to parse the expressions:

  • horizantal white-space, commas and the token and are ignored;

  • an expresion in the form N factor is translated to N * factor_in_seconds. factor is optional, defaults to seconds. Negative and fractional values of N are suported. Singular, plural and single letter versions of factor are understood. All are case-insensitive except the single letter versions;

  • expressions in the form hh:mm:ss, hh:mm are also supported;

  • the tokens plus or minus change the signal of the expressions that follow them;

  • the final value is the sum of all the expressions taking in account the sign defined by the previous rule.

Factors

The following factors are understood, with the corresponding value in seconds between parentesis:

  • seconds (1): s, second, seconds, sec, and secs;

  • minutes (60): m, minute, minutes, min, and mins;

  • hours (60 * minutes factor): h, hr, hour, and hours;

  • days (24 * hours factor): d, day, and days;

  • weeks (7 * days factor): w, week, and weeks;

  • months (30 * days factor): M (note the case), month and months;

  • years (365 * days factor): y, year, and years;

FUNCTIONS

parse_duration

    $seconds = parse_duration($expression);

Given an $expression in natural lanaguage returns the number of seconds it represents. This result is cached so future calls with the same expression will be faster.

If the expression cannot be parsed, parse_duration will croak.

parse_duration_nc

Same as "parse_duration", but the result will not be cached.

HISTORY

This module started as a private module for a closed-source project. I started to release it as Time::Delta when I discovered Time::Duration::Parse. I updated the API to match it, and added my own improvements. This is the result.

SEE ALSO

Time::Duration::Parse and Time::Duration.

SUPPORT

Perldoc

You can find documentation for this module with the perldoc command.

  perldoc Time::Duration::Parse::More

Websites

The following websites have more information about this module, and may be of help to you. As always, in addition to those websites please use your favorite search engine to discover more resources.

Email

You can email the author of this module at MELO at cpan.org asking for help with any problems you have.

Bugs / Feature Requests

Please report any bugs or feature requests by email to bug-time-duration-parse-more at rt.cpan.org, or through the web interface at http://rt.cpan.org/Public/Dist/Display.html?Name=Time-Duration-Parse-More. You will be automatically notified of any progress on the request by the system.

Source Code

https://github.com/melo/perl-time-duration-parse-more

  git clone https://github.com/melo/perl-time-duration-parse-more.git

ACKNOWLEDGEMENTS

Stole test cases and other small tidbits from Miyagawa's Time::Duration::Parse.

AUTHOR

Pedro Melo <melo@cpan.org>

COPYRIGHT AND LICENSE

This software is Copyright (c) 2013 by Pedro Melo.

This is free software, licensed under:

  The Artistic License 2.0 (GPL Compatible)