++$count{$2}; # Why ++$count? why {$2} here? is it bcos of (Passed
+|Blocked) ?
##</code><code>##

  } elsif (/amavis.*(BAD-HEADER)-/) {
    ++$count{$1}; # why {$1} here? is it bcos of (BAD-HEADER)

##</code><code>##

  } elsif (/reject/){
    ++$count{'REJECTED'}; #Hmm, Why {'REJECTED'}?
  }
}

##</code><code>##

my @data=();
$data[0] = $count{'CLEAN'} || 0; # use 0 if $count{'CLEAN'} is undefined 
$data[1] = $count{'SPAM'} || 0;
$data[2] = $count{'INFECTED'} || 0;
$data[3] = $count{'BANNED'} || 0;
$data[4] = $count{'BAD-HEADER'} || 0;
$data[5] = $count{'REJECTED'} || 0;