Index: twitter/show_status.pl
===================================================================
--- twitter/show_status.pl	(revision 4e0b0a1745557341454c79314947819b728f6e5e)
+++ twitter/show_status.pl	(revision 035465bb947e40f543c1af710a427e0671ee5a41)
@@ -29,5 +29,18 @@
         my $res = $bot->show_status($id);
         use Data::Dumper;
-        print Dumper $res;
+        foreach my $line (split /\n/, Dumper $res) {
+            if ($line =~ /undef/) { next; }
+            unless ($line =~ / => {/
+                ||  $line =~ / = /
+                ||  $line =~ /status/
+                ||  $line =~ /'text'/
+                ||  $line =~ /created/
+                ||  $line =~ /'id'/
+                ||  $line =~ /name/
+                ||  $line =~ / },/
+                ||  $line =~ / };/
+            ) { next; }
+            print $line, "\n";
+        }
     }
 };