手元で記録してるテキストとダッシュボードでの表示人数に誤差が出てたので、ちょろっと取得してきてつき合わせてみる。
use strict; use warnings; use HTML::TreeBuilder::XPath; use Perl6::Say; my $tree = HTML::TreeBuilder::XPath->new; $tree->parse_file('following.html'); my $ns = $tree->findnodes('//div[@class="username"]/a'); foreach my $c ($ns->get_nodelist) { say $c->attr('href'); }