*wrap_with_tag = curry( \&curry, \&wrap_with_html );

my %handlers = (
    'none' => sub {shift},
    'bold' => wrap_with_tag('b'),
    'ital' => wrap_with_tag('i'),
    'para' => wrap_with_tag('p'),
);
[download]