App-Twitch
view release on metacpan or search on metacpan
lib/App/Twitch.pm view on Meta::CPAN
Agent => $self->http_agent,
Alias => $self->_http_alias,
Timeout => 30,
ConnectionManager => $self->_keepalive,
FollowRedirects => 5,
);
$self->_max_feeds_count;
my $running_config_dumpfile = $self->tmpdir.'/'.$self->configfile;
$running_config_dumpfile =~ s/\.yml/\.running_config\.yml/;
DumpFile($running_config_dumpfile,$self->running_config);
chmod 0600, $running_config_dumpfile;
$self->yield('add_feed');
}
event add_feed => sub {
my ( $self, $kernel ) = @_[ OBJECT, KERNEL ];
my $feed_url = $self->feeds_shift;
$self->logger->info($self->logger_prefix.'Adding feed: '.$feed_url);
eval {
my $feed = {
url => $feed_url,
( run in 0.273 second using v1.01-cache-2.11-cpan-496ff517765 )