and how to simplify Test::Class tests