my $func = ($foo > 7)
  ?  $bar && \&bar_mysub
  || $baz && \&baz_mysub
  || $qux && \&qux_mysub
  :  $bar && \&bar_other_mysub
  || $baz && \&baz_other_mysub
  || $qux && \&qux_other_mysub
;
$func->($foo) if $func;