Parse index.db a little better, so that maintainer-less packages don't
slip through.
my @result = ();
while(<I>)
{
- if (m/^(\S+)\s+(\d+)\s+(\S+)\s+(\d+)\s+\[\s*([^]]*[^]\s])\s*\]\s+(\w+)\s+(.+)$/) {
+ if (m/^(\S+)\s+(\d+)\s+(\S+)\s+(\d+)\s+\[\s*([^]]*)\s*\]\s+(\w+)\s+(.+)$/) {
if ($bugfunc->(pkg => $1, bug => $2, maint => $5,
severity => $6, title => $7))
{