'versions' => {function => \&add_versions,
},
'debinfo' => {function => \&add_debinfo,
+ arguments => {'0|null' => 0},
},
'maintainers' => {function => \&add_maintainers,
},
my ($options,$opts,$p,$config,$argv) = @_;
my @files = @{$argv};
+ if (not @files) {
+ {
+ if ($opts->{0}) {
+ local $/ = "\0";
+ }
+ while (<STDIN>) {
+ push @files, $_;
+ }
+ }
+ }
return unless @files;
my $s = db_connect($options);
my %arch;