diff options
Diffstat (limited to 'lib/Feed.pm')
-rw-r--r-- | lib/Feed.pm | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/lib/Feed.pm b/lib/Feed.pm index fbcdf10..652c438 100644 --- a/lib/Feed.pm +++ b/lib/Feed.pm @@ -30,6 +30,19 @@ has feed => ( builder => 'get_feed', ); +has title => ( + is => 'ro', + isa => 'Str', + lazy_build => 1, + builder => 'extract_title', +); + +sub extract_title { + my ($self) = @_; + + return $self->feed->title; +} + has _entries => ( is => 'ro', isa => 'ArrayRef[XML::Feed::Entry]', |