while $dragon->isa(SCHREIBFAULE) do { use('?') };
while $dragon->wants(BETTERREADING, 4, Others) do { use(IF) };