CPAN::Groonga

d qw(getcwd abs_path);
use Encode qw(decode encode);
use File::Spec;
use HTML::Entities;
use JSON;
use JSON::Feed;
use Mojo::DOM;
use XML::Atom::SimpleFeed;

use App::WRT::Date qw(iso_date rfc_3339_da

uration is read from a F<wrt.json> in the directory where the C<wrt>
utility is invoked, or can (usually) be specified with the C<--config> option.

See F<example/wrt.json> for a sample configuration.

 hood, configuration is done by combining a hash called C<%default>
with values pulled out of the JSON file.  Most defaults can be overwritten
from the config file, but changing some would require wri

d_alias};
  my $xml_feed_content = $self->{wrt}->feed_print_recent();
  my $json_feed_content = $self->{wrt}->feed_print_json_recent();
  $self->write("${publish_dir}/${feed_alias}", $xml_feed_content

ish_dir}/${feed_alias}.xml", $xml_feed_content);
  $self->write("${publish_dir}/${feed_alias}.json", $json_feed_content);

  # Handle any other paths that aren't derived directly from files:
  my @met