view release on metacpan or  search on metacpan

lib/BuzzSaw/ReportLog.pm  view on Meta::CPAN

=item $log->has_weekly_timestamp($report_name)

Returns true or false to indicate whether (or not) a timestamp has
been recorded for a weekly report of this name.

=item $time = $log->get_weekly_timestamp($report_name)

Retrieves the timestamp, in seconds since the unix epoch, for a
weekly report of this name.

=item $log->set_weekly_timestamp($report_name => time )

Sets the timestamp, in seconds since the unix epoch, for a weekly
report of this name. If the C<store_after_change> attribute is set to
true then the change will immediately be written back to the log file.

=item $log->has_monthly_timestamp($report_name)

Returns true or false to indicate whether (or not) a timestamp has
been recorded for a monthly report of this name.

=item $time = $log->get_monthly_timestamp($report_name)

Retrieves the timestamp, in seconds since the unix epoch, for a
monthly report of this name.

=item $log->set_monthly_timestamp($report_name => time )

Sets the timestamp, in seconds since the unix epoch, for a monthly
report of this name. If the C<store_after_change> attribute is set to
true then the change will immediately be written back to the log file.

=item $log->store([$force])

This method can be called to write the log out to the file. It will
only do something if changes have been made to any of the timestamps
or if the optional C<force> parameter is set to true. If the newly
generated file is identical to the previous one then no replacement is
made so that file modification times are preserved.

=head1 DEPENDENCIES

This module is powered by L<Moose>. It uses L<YAML::Syck> to store the
log data into a file. It also uses L<Text::Diff> to check if the file
has changed so that it only has to overwrite when absolutely
necessary.

=head1 SEE ALSO

L<BuzzSaw>, L<BuzzSaw::Reporter>, L<BuzzSaw::Report>

=head1 PLATFORMS

This is the list of platforms on which we have tested this
software. We expect this software to work on any Unix-like platform
which is supported by Perl.

ScientificLinux6

=head1 BUGS AND LIMITATIONS

Please report any bugs or problems (or praise!) to bugs@lcfg.org,
feedback and patches are also always very welcome.

=head1 AUTHOR

    Stephen Quinney <squinney@inf.ed.ac.uk>

=head1 LICENSE AND COPYRIGHT

    Copyright (C) 2012 University of Edinburgh. All rights reserved.

This library is free software; you can redistribute it and/or modify
it under the terms of the GPL, version 2 or later.

=cut