Select Code to Download

#!/usr/bin/perl -w

...

     print "results = @results\n\n";
     }

CATEGORY    NVL(COUNT,0)
1                0
2                11
3                15
4                7