my $p = Parse::BBCode->new({
    tags => {
        ...
        code => {
            code => sub {
                my ($parser, $attr, $content, $attribute_fallback) = @_;
            },
        }, ...