SELECT 
    report_no,
    reported_by,
    project_no,
    to_char(date_reported,'DD-MON-YYYY'),
    cat1, cat2, cat3
compute avg(cat1), avg(cat2), avg(cat3)

##</code><code>##

my @sums;

##</code><code>##

$sums[$number] += $element;