Evaluated proc person name { if { $name == "malcom" } { ascii wizardwhale } elseif {$name == "crack"} {ascii pumpwhalepenis} { ujpeg [regsub {,.+$} [pics $name] .jpg] 120 } }