Fixed perl reports