in reply to Parse::RecDescent and dollar sign

Use 
$grammar = q {
  dollar : /\\$/  { $item[1] }
};

[download]
or 
$grammar = <<'__END_OF_GRAMMAR__';
  dollar : /\$/  { $item[1] }
__END_OF_GRAMMAR__

[download]

In Section Seekers of Perl Wisdom