From: mitty Date: Sun, 19 Dec 2010 02:13:33 +0000 (+0000) Subject: * change order of column X-Git-Url: http://lab.mitty.jp/git/?a=commitdiff_plain;h=ee655ecc81f3c02cd73b34e19e0f4fbb51b4efdb;p=lab.git * 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 --- 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";