Help for this page

Select Code to Download


  1. or download this
      function_call: identifier '(' arg(s?) ')'

  identifier: /[a-z]\w*/i
  2. or download this
    #! /usr/local/bin/perl -ws
use Parse::RecDescent;
...
while (<DATA>) { print $parse->function_call($_); }
__DATA__
a(1)