{ # Place this block at the top of the grammar, before any rules.
   use Text::Balanced qw( extract_quotelike );
}

string: { [ $item[0], scalar extract_quotelike($text) ] }