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

NAME

Catmandu::Fix::sfx_threshold - parse the SFX threshold data

  # Map the SFX threshold data
  marc_map('866a','holding.$append')

  # Calculate the content of the holdings
  sfx_threshold(holding.*)

  # If the SFX threshold was something like:
  #
  #  Available from 2013
  #
  # then the holding contains
  #
  # holding => [{
  #     raw => 'Available from 2013' , 
  #     start => {
  #         year => 2013
  #     } , 
  #     end => {} , 
  #     limit => {} , 
  #     years => [ 2013, 2014, .... $current_year ]
  # }]

DESCRIPTION

The sfx_threshold parses the Ex Libris SFX data for machine processing. The result output contains a HASH for every threshold containing the following fields:

   * raw          - The unprocessed SFX threshold
   * start.year   - A start year
   * start.volume - A start volume
   * start.issue  - A start issue
   * end.year     - An end year
   * end.volume   - An end volume
   * end.issue    - An end issue
   * limit.num    - Number of year or months if a moving wall is applicable
   * limit.type   - 'year' or 'month'
   * limit.availble - 1, when the holding includes the years/months, 0 otherwise
   * human        - A human understandable string. E.g. 1997 - 2013
   * is_running   - 1, when it is a running subscription, 0 otherwise
   * years        - An array of all years available [ 2001, 2002, 2003 ... ]
   

AUTHOR

Patrick Hochstenbach <Patrick.Hochstenbach@UGent.be>

COPYRIGHT AND LICENSE

This software is copyright (c) 20145by Patrick Hochstenbach.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.