Plagger::Plugin::Subscription::File - Store feed URLs in a file

Plagger documentation Contained in the Plagger distribution.

Index

Code Index:

NAME

Top

Plagger::Plugin::Subscription::File - Store feed URLs in a file

SYNOPSIS

Top

  - module: Subscription::File
    config:
      file: feeds.txt

DESCRIPTION

Top

This module subscribes to feed URLs from a file, where each line is one URL. Lines that start with # are ignored.The URLs can also point to HTML files, in which case feed autodiscovery will happen. The file configuration key can point to any URI supported. If a scheme is not specified, 'file' is assumed.

AUTHOR

Top

Ilmari Vacklin <ilmari.vacklin@helsinki.fi>

SEE ALSO

Top

Plagger

LICENSE

Top

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

Plagger documentation Contained in the Plagger distribution. 
package Plagger::Plugin::Subscription::File;

use strict;
use warnings;

use base qw(Plagger::Plugin);
use Plagger::Util;

use URI;

sub register {
    my ( $self, $context ) = @_;

    $context->register_hook( $self, 'subscription.load' => \&load );
}

sub load {
    my ( $self, $context ) = @_;

    my $uri = URI->new( $self->conf->{file} )
      or $context->error("config 'file' is missing");

    $uri->scheme('file') unless $uri->scheme;

    for ( split /\n/, Plagger::Util::load_uri($uri)) {
        s/\#.*//;
        next if /^\s*$/;
        my $feed = Plagger::Feed->new;
        $feed->url($_);
        $context->subscription->add($feed);
    }

    return 1;
}

1;