- push @feeds, [$line[0], $line[1], \@src];
+ my %flags;
+ if (defined $flags) {
+ while ($flags =~ m!\s+--(\w+)(?:=(\S+))?!g) {
+ $flags{$1} = defined($2) ? $2 : 1;
+ }
+ }
+
+ if ($type eq "include") {
+ parse_file($urls, $existing) or
+ die "Unable to open included file '$urls'";
+ next;
+ }
+
+ push @feeds, ["src-$type", $name, \@src, \%flags];