my $pm_obj = PerlMonks::Mechanized->new();
my $node_data = $pm_obj->node_info( @node_ids );
add_node_data( $node_data, \%alldata );
my $title = $alldata{ $node_ids[3] }{title};