up_trigger test-harness dispel_self &&
up_trigger perl cast_self
