e strict;
use warnings;
use base qw( SWISH::Prog::Aggregator );
use Carp;
use YAML::Syck ();
use JSON ();
use SWISH::Prog::Utils;
use Scalar::Util qw( blessed );
__PACKAGE__->mk_accessors(
s to Perl built-in
time().
=item serial_format
Which format to use in serialize(). Default is C<json>. You can also use C<yaml>.
If you don't like either of those, subclass SWISH::Prog::Aggregator::
l} ||= 'url';
$self->{modtime} ||= 'modtime';
$self->{serial_format} ||= 'json';
unless ( $self->{methods} ) {
croak "methods required";
}
# set up the co