diff options
| author | dakkar <dakkar@thenautilus.net> | 2012-12-09 13:45:17 +0000 |
|---|---|---|
| committer | dakkar <dakkar@thenautilus.net> | 2012-12-09 13:45:17 +0000 |
| commit | f4c31024fc3dd0210ce8821e8b63d9f411828c3f (patch) | |
| tree | e24f34fdedf53ee7ede6c2e97326a1ce396fc0f0 /lib/Feed/Printer.pm | |
| parent | fix datetime (diff) | |
| download | feeder-f4c31024fc3dd0210ce8821e8b63d9f411828c3f.tar.gz feeder-f4c31024fc3dd0210ce8821e8b63d9f411828c3f.tar.bz2 feeder-f4c31024fc3dd0210ce8821e8b63d9f411828c3f.zip | |
de-duping
Diffstat (limited to 'lib/Feed/Printer.pm')
| -rw-r--r-- | lib/Feed/Printer.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/Feed/Printer.pm b/lib/Feed/Printer.pm index 5743883..7fd2f65 100644 --- a/lib/Feed/Printer.pm +++ b/lib/Feed/Printer.pm @@ -14,10 +14,15 @@ before process => sub { sub process_entry { my ($self,$entry) = @_; + $self->log->trace('process_entry - begin'); + for my $f (qw(id title link issued modified)) { say " $f:",$entry->$f//'<undef>'; } + say $entry->content->body; say ''; + + $self->log->trace('process_entry - end'); } 1; |