add first perl class