perl は滅多に使わないので、たまには使ってみる

use strict;
use Net::Twitter;
my $twit = Net::Twitter->new(
             username => "your email",
             password => "your password"
           );
my $array_ref = $twit->friends_timeline();
foreach my $hash_ref ( @$array_ref ) {
  print $hash_ref->{'id'}, ": ", $hash_ref->{'text'}, "[", $hash_ref->{'created_at'}, "]\n";
}

というか、「スーパーpre記法」というのをいまさらのように使ってみるテスト。