if (exists $precedence_table{$value}) { my $precedence = ( $n + $precedence_table{$value} ); $expression_list[$i] = [ { $key => $$_{$key} }, $precedence ]; }