my %op = (
  'toupper' => sub { uc shift },
  ...
);