}
defvalopt '--since-version', '-v', '[^_]+|_', \$changes_since_version;
-defvalopt '--distro', '-d', '.+', \$idistro;
-defvalopt '--existing-package', '', '.*', \$existing_package;
+defvalopt '--distro', '-d', '.+', \$idistro;
+defvalopt '--existing-package','', '.*', \$existing_package;
sub parseopts () {
my $om;