Evaluated proc troll args {set ::current_troll [trolldb [join $args " "]]}