Evaluated proc test {} {set ok {abc}; . $$::nigger_$ok}