Select Code to Download

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

my $func = ( $foo > 7 )
  ? $bar && \&bar_mysub
...
  || $bam && \&bam_other_mysub
  || $bak && \&bak_other_mysub;
$func->($foo) if $func;