sub Populate{
...
  $self->ConfigSpecs( 
    -infile => [ qw/METHOD infile INFILE],
    -configx => [ qw/PASSIVE configx CONFIGX] );
...
}