X-Git-Url: http://lab.mitty.jp/git/?a=blobdiff_plain;f=Dev%2Ftwitter%2Fdump_timeline.pl;h=72f7881922ea47c671ed33f04226230157a5cd04;hb=b949a0f80b773a49f5029132c716ce019507e3bd;hp=95385e44b73ab5beafb40a074d5015b2630faf83;hpb=5fa546f5c2cf727d3ad1f9bf52f36d89c81597de;p=lab.git

diff --git a/Dev/twitter/dump_timeline.pl b/Dev/twitter/dump_timeline.pl
index 95385e4..72f7881 100755
--- a/Dev/twitter/dump_timeline.pl
+++ b/Dev/twitter/dump_timeline.pl
@@ -85,6 +85,7 @@ eval {
             foreach my $status (@{$res}) {
                 my $text = "";
                 $text .= "(". $status->{id} . ") ";
+                $text .= $status->{user}{screen_name} . "|";
                 $text .= $status->{user}{name};
                 $text .= " [" . $status->{created_at} . "]";
                 $text .= " ".  $status->{text};