The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

%%
S:   
      ('a' S ) 'b'  { shift; [ @_ ] }
    | 'c'   
;
%%

# eyapp -TC Parenthesis.eyp
# ./Parenthesis.pm -t -c 'acb'