my $rules = <<'END_OF_GRAMMAR';
    lexeme default  = latm => 1
    :default        ::= action => [name,values]
    :start          ::= <entry>

    <entry>         ::= <op> (SP) <hostaddr4>
    <op>            ::= 'add' | 'remove'

    <ipv4>          ::= NUMBER ('.') NUMBER ('.') NUMBER ('.') NUMBER
    <hostname>      ::= NAME+               separator => DOT

    <hostaddr4>     ::= <ipv4> | <hostname>

    DOT             ~ '.'
    SP              ~ [\s]+
    NAME            ~ [^\s.]+
    NUMBER          ~ [\d]+
END_OF_GRAMMAR