The node you are looking for is at Texinfo::Report my $registrar = Texinfo::Report::new().