aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xrun/rss4
1 files changed, 3 insertions, 1 deletions
diff --git a/run/rss b/run/rss
index 5511350..80256e4 100755
--- a/run/rss
+++ b/run/rss
@@ -16,7 +16,9 @@ my %feeds = (
my $feed = XML::Feed->parse(URI->new($feeds{$name}))
or die XML::Feed->errstr;
-my @entries = $feed->entries;
+
+# Sort entries
+my @entries = sort { $b->issued <=> $a->issued } $feed->entries;
# Print summary of five latest entries
for my $entry (@entries[0..4]) {