apache.pg

# this causes a 'null PMC access' in rakudo
# which is an obvious improvement.

use v6;
 
grammar Apache {
    regex TOP {
        <directive>+
    }
 
    regex directive {
        \h* [
            | <directive_name> [\h+ <argument>]+\n+
            | '<'<directive_name> [\h+ <argument>]?'>'\n <directive>+ '</'$0'>'\n
            ]
    }
    
    token directive_name {
        (\w+)
    }
 
    regex argument {
        | '"' (<-["]>*) '"'
        | (\S+)
    }
 
}
 
my $conf = $*IN.slurp;
 
Apache.parse($conf);
$/.perl.say;

gistfile2.txt

TestDirective ArgOne "Arg Two"
ServerRoot "/test"

Include other/*.conf

<Asdf jkl>
    DirectoryIndex index.html "test index.html"
</Asdf>

# it seems to be any angle bracket rule causes the error

#<Directory "/Documents and Settings/user/etc">
    DirectoryIndex index.html "test index.html"
    Allow from All
</Directory>


#<Directory />
    Options FollowSymLinks
    AllowOverride None
    Order deny,allow
    Deny from all
</Directory>


<IfModule log_config_module>
    LogFormat "%h %l %u %t \"%r\" %>s %b \"%{Referer}i\" \"%{User-Agent}i\"" combined
</IfModule> 

ExampleDirective ArgOne "Arg Two" \
        ArgThree