projects
/
lab.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
* change order of column
[lab.git]
/
Dev
/
twitter
/
dump_timeline.pl
diff --git
a/Dev/twitter/dump_timeline.pl
b/Dev/twitter/dump_timeline.pl
index
deba425
..
1fa8121
100755
(executable)
--- a/
Dev/twitter/dump_timeline.pl
+++ b/
Dev/twitter/dump_timeline.pl
@@
-84,9
+84,9
@@
eval {
else {
foreach my $status (@{$res}) {
my $text = "";
else {
foreach my $status (@{$res}) {
my $text = "";
+ $text .= "(". $status->{id} . ") ";
$text .= $status->{user}{name};
$text .= " [" . $status->{created_at} . "]";
$text .= $status->{user}{name};
$text .= " [" . $status->{created_at} . "]";
- $text .= " (". $status->{id} . ")";
$text .= " ". $status->{text};
$text =~ s/\n//;
print encode('utf8', $text), "\n";
$text .= " ". $status->{text};
$text =~ s/\n//;
print encode('utf8', $text), "\n";