a perl script to find the performance of the class using fuzzy logic