my $contition = $some_letter;

my %dispatch = (
  a => sub {
      # do something with a
  },
  b => \&do_something_with_b,
  c => ...
);
$dispatch{$condition}->();