Scroll to navigation

Biblio::COUNTER::Processor::Atomize(3pm) User Contributed Perl Documentation Biblio::COUNTER::Processor::Atomize(3pm)

NAME

Biblio::COUNTER::Processor::Atomize - break a COUNTER report into itsy pieces

SYNOPSIS

    use Biblio::COUNTER::Processor::Atomize;
    $processor = Biblio::COUNTER::Processor::Atomize->new;
    $report = $processor->run($file_or_filehandle);

DESCRIPTION

Biblio::COUNTER::Processor::Atomize breaks a COUNTER report into tiny pieces (figuratively speaking) and executes a callback for each valid usage number it finds.

The callback function should look something like this:

    sub my_callback {
        my %data = @_;
        $title  = $data{title};
        $count  = $data{count};
        $metric = $data{metric};
        $period = $data{period};
        # etc.
    }

The following elements may appear in the hash passed to the callback function:

The short code that indicates the type of the report (e.g., "JR1" or "DB3").
The name of the file containing the report. Set to "-" if processing standard input.
The Biblio::COUNTER::Processor::Atomize instance.
The instance of the appropriate subclass of Biblio::COUNTER::Report
A string of the form YYYY-mm denoting the period in question.
The type of event counted ("requests", "sessions", "searches", or "turnaways").
The count itself. The callback is not executed for a blank or invalid count.
The platform on which the resource was provided.
The resource title.
The resource's publisher. May be the empty string.
The journal's print ISSN.
The journal's online ISSN.
The book's ISBN.

PUBLIC METHODS

    $foo = Biblio::COUNTER::Processor::Atomize->new;
    

%args is a list of (key, value) pairs. The only key that means anything is callback; the value associated with it is a reference to the desired callback function.

The desired callback function prints (to standard output) a single tab-delimited line for each datum, with a header. Each line of output has the following elements, in the order listed:

    $report = $processor->run($what);
    

Process the given report.

$what may be a file handle, the name of a file, or an instance of (a subclass of) Biblio::COUNTER::Report.

INHERITANCE

Biblio::COUNTER::Processor::Atomize is designed to be inheritable.

BUGS

There are no known bugs. Please report bugs to the author via e-mail (see below).

AUTHOR

Paul Hoffman (nkuitse AT cpan DOT org)

COPYRIGHT

Copyright 2008 Paul M. Hoffman.

This is free software, and is made available under the same terms as Perl itself.

SEE ALSO

Biblio::COUNTER

Biblio::COUNTER::Report

Biblio::COUNTER::Report::Processor

2023-02-04 perl v5.36.0