my $biup = compose map curry( \&wrap_with_html, $_ ), qw( p u i b );