Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...

Parse::RecDescent->Precompile($grammar, 'VCSConfigParser')
   or die("Bad grammar\n");
  2. or download this
    use strict;
use warnings;
...

system njengsunvcs2 (
        )
  3. or download this
    def : IDENT { $item[1] eq "cluster" ?1:0 } IDENT "(" attr(s?) ")"
    | IDENT { $item[1] eq "system"  ?1:0 } IDENT "(" attr(s?) ")"