From 2b6eb0b7517775323e7bdd12100407ff63d1787c Mon Sep 17 00:00:00 2001 From: mitty Date: Sun, 1 May 2011 10:23:46 +0000 Subject: [PATCH] * add screen_name output git-svn-id: https://lab.mitty.jp/svn/lab/trunk@118 7d2118f6-f56c-43e7-95a2-4bb3031d96e7 --- Dev/twitter/dump_timeline.pl | 1 + 1 file changed, 1 insertion(+) 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}; -- 1.7.9.5