pb.pl

grammar PB::Grammar {
    token TOP { ^ [\s+]? <proto> [\s+]? $ }
    token proto { [<message> | ';'] }
    token message { 'message' \s+ <ident> \s+ <message-body> [\s+]? }
    token ident { \w+ }
    token message-body { '{' [\s+]? [<message>+]? [\s+]? '}' }
}

say PB::Grammar.parse('
    message fart { 
        message butt {} 
        message butt2 { 
            message inner_butt {} 
        } 
    }'
)