sub RunCodeSets { my $self = shift; for ($self->CodeSets) { $_->Process; } }