my $manuals = $v->{"man$i"} = [ map { "$_.$i" } @$ary ];
push @{$v->{manuals}}, @$manuals;
push @{$v->{mantxt}}, map { "Documentation/$_.txt" } @$ary;
my $manuals = $v->{"man$i"} = [ map { "$_.$i" } @$ary ];
push @{$v->{manuals}}, @$manuals;
push @{$v->{mantxt}}, map { "Documentation/$_.txt" } @$ary;