class Employee::Former is Employee { method new(*%params) { %params //= 'Team Member'; return callwith(|%params); } method name_and_title { my $old = callsame; return "$old (Former)"; } }