my %on = ();
$s .= ",";
unless ($s =~ s/NONE,//) {
  $on{$_} = $s =~ s/-$_,// for
    qw( config files params driverPath appPath batchPath );
}
die if length $s;