Select Code to Download

  # called with : mkBless(\$p->{Vcpeid}{$cpeid}, RepoVData->new);
  sub mkBless($;$) {
...
    }
    \$targ
  }

  # notice @ params: contails optional class name and any optional par
+ams to new()
  sub mkBless($;@) {
...
  }
# example call:
my $obj = mkBless(\$someotherobj, 'RepoVData', 1,2,3);