Select Code to Download

somwhere further above:
{ package RPM_data;                     #{{{  
...
  use Data::Vars [qw(RepoDB RepoXMLs )],          #RDFile_inf
                { RepoXMLs  =>  sub() { {} },     # HASH{type => RDFil
+e_inf}
                  RepoDB    =>  sub() { {} }, };  # nam=>rpmdata

$p->{Vcpeid}{$cpeid} = RepoVData->new() unless blessed $p->{Vcpeid}{$c
+peid};
$p->{Vcpeid}{$cpeid}{RepoDB} = RepoDB->new() unless blessed $p->{Vcpei
+d}{$cpeid}{RepoDB}
...
                                             blessed $p->{Vcpeid}{$cpe
+id}{RepoDB}{$nam};
$p->{Vcpeid}{$cpeid}{RepoDB}{$nam}{vr($V, $R) = RPM_data->new({...}) u
+nless blessed 
                                      $p->{Vcpeid}{$cpeid}{RepoDB}{$na
+m}{vr($v, $R) ....