myrule: brace_clause { print "$_\n" for @item; } brace_clause: '{' word '}' { join ' ', @item[1..3] } word: m{ [a-z]+ }xms --output:-- myrule { hello }