* change order of column

{{{
(status_id) screen_name [created_at] text
}}}
  * created_at => UTC

git-svn-id: https://lab.mitty.jp/svn/lab/trunk@100 7d2118f6-f56c-43e7-95a2-4bb3031d96e7

diff --git a/Dev/twitter/dump_timeline.pl b/Dev/twitter/dump_timeline.pl
index deba425..1fa8121 100755 (executable)
--- a/Dev/twitter/dump_timeline.pl
+++ b/Dev/twitter/dump_timeline.pl
@@ -84,9 +84,9 @@ eval {
         else {
             foreach my $status (@{$res}) {
                 my $text = "";
+                $text .= "(". $status->{id} . ") ";
                 $text .= $status->{user}{name};
                 $text .= " [" . $status->{created_at} . "]";
-                $text .= " (". $status->{id} . ")";
                 $text .= " ".  $status->{text};
                 $text =~ s/\n//;
                 print encode('utf8', $text), "\n";