$pendingtotal++ if ($scanlib::bugs{$nr} =~ m/^\[[^]]*P/);
$patchtotal++ if ($scanlib::bugs{$nr} =~ m/^\[[^]]*\+/);
$ignoretotal++ if ($scanlib::bugs{$nr} =~ m/^\[[^]]*I/);
$pendingtotal++ if ($scanlib::bugs{$nr} =~ m/^\[[^]]*P/);
$patchtotal++ if ($scanlib::bugs{$nr} =~ m/^\[[^]]*\+/);
$ignoretotal++ if ($scanlib::bugs{$nr} =~ m/^\[[^]]*I/);