sub f{for($t=pop;$_=(0,l,r)[$$t{d}cmp$_[0]]and$t=$$t{$_};){}$t}