* change order of column
[lab.git] / Dev / twitter / dump_timeline.pl
index deba425..1fa8121 100755 (executable)
@@ -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";