This is a little perl script which will scan a specified log file for
"identified spam" or "clean message" lines. It rounds off the score, tallies the
results, and prints a graph of scores and occurances. The graph is scaled to a
defalut width of 72.

I wrote this because I hoped to find a local minimum at a score between the peak
spam value and the peak nonspam value. I use this as my required_hits.

A portion of a graph follows, portions trimmed for brevety:

~/bin/sa_score_graph.pl /var/log/syslog | more
SpamAssassin score summary:
Minimum score: -112
Maximum score: 52
Minimum count: 0
Maximum count: 736
Scaling to: 0.0978260869565217
-112    :*
-111    :*
-110    :
-109    :
-108    :*
-107    :
-106    :*
-105    :
-104    :*********************************
-103    :*
-102    :*
-101    :*
-100    :*
-99     :*
-98     :*
-97     :*
-96     :*
-95     :*
-94     :*
-93     :*
-92     :*
-91     :
-90     :*
-89     :*
-88     :*
-87     :
-86     :*
-85     :
-84     :

(Snipped)

-13     :*
-12     :*
-11     :
-10     :
-9      :*
-8      :*
-7      :*
-6      :*
-5      :*
-4      :************************************************************************
-3      :***************
-2      :***********
-1      :********
0       :************
1       :**********
2       :************
3       :**********
4       :*********
5       :***********
6       :*******
7       :********
8       :*****
9       :*******
10      :*****
11      :******
12      :********
13      :************
14      :***************
15      :***********
16      :**********
17      :*************
18      :***********
19      :********
20      :*********
21      :********
22      :*****
23      :**********
24      :*********
25      :****
26      :******
27      :***
28      :****
29      :*****
30      :***
31      :*
32      :**
33      :*
34      :*
35      :*
36      :*
37      :*
38      :*
39      :*
40      :*
41      :*
42      :