my %actions = '*' => { $^a * $^b }, '/' => { $^a / $^b }, '+' => { $^a + $^b }, '-' => { $^a - $^b }; ... make %actions{$.ast}.(|$/)