X-Git-Url: http://lab.mitty.jp/git/?a=blobdiff_plain;f=Dev%2Ftwitter%2Fdump_timeline.pl;h=1fa8121771253ab32f38e54d053bf31ed2934bcb;hb=ee655ecc81f3c02cd73b34e19e0f4fbb51b4efdb;hp=82162879a883fc4a3fd077e2fd0daeba2cbf2577;hpb=fe7588333fde0d1dba7162596725ea5f269b68ab;p=lab.git diff --git a/Dev/twitter/dump_timeline.pl b/Dev/twitter/dump_timeline.pl index 8216287..1fa8121 100755 --- a/Dev/twitter/dump_timeline.pl +++ b/Dev/twitter/dump_timeline.pl @@ -84,12 +84,12 @@ eval { else { foreach my $status (@{$res}) { my $text = ""; + $text .= "(". $status->{id} . ") "; $text .= $status->{user}{name}; $text .= " [" . $status->{created_at} . "]"; - $text .= " (". $status->{id} . ")"; - $text .= " ". encode('utf8', $status->{text}); + $text .= " ". $status->{text}; $text =~ s/\n//; - print $text, "\n"; + print encode('utf8', $text), "\n"; } } }