Change pager behavior to make more sense

guestbook-ng.pl

@@ -45,7 +45,7 @@ under sub ($c) {
 get '/' => sub ($c) {
     my $posts      = $c->message->get_posts();
     my $last_page  = $c->message->get_last_page(@$posts);
-    my $this_page  = $c->param('page') || $last_page;
+    my $this_page  = $c->param('page') || 1;
     my @view_posts = $c->message->view_posts($this_page, $last_page, @$posts);
 
     $c->stash(

lib/GuestbookNg/Model/Message.pm

@@ -14,7 +14,11 @@ sub new($class, $pg, $pg_object) {
 }
 
 sub get_posts($self) {
-    $self->pg->db->query('SELECT date, name, msg FROM messages;')->arrays()
+    $self->pg->db
+        ->query('SELECT to_char(date, \'Dy Mon DD HH:MI:SS AM TZ YYYY\'),
+                        name, msg
+                   FROM messages
+                  ORDER BY date DESC;')->arrays()
 }
 
 sub send_post($self, $name, $msg) {

templates/index.html.ep

@@ -2,7 +2,7 @@
 % title 'Home';
 <h2>Messages from the World Wide Web</h2>
 <table>
-<% for my $row (reverse @$view_posts) { %>
+<% for my $row (@$view_posts) { %>
 <tr>
   <th>Date:</th>
   <td><%= @$row[0] %></td>