やっつけだけど、自分と自分のお友達は表示しないようにしてみたdiff。 15c15 < my @following; --- > my %my_following; 17,18c17 < my $scr_name = encode 'ascii', $m_xp->find('./screen_name', $node); < push @following, $scr_name; --- > $my_follow…