perl Class-Adapter