2009-11-01から1日間の記事一覧
単純な足し算だけに続いて,引き算もしたいということで,単純に拡張します. use strict; use warnings; use Parse::RecDescent; my $grammar=q( expression : atom "+" expression { $return = $item[1] + $item[3] ;} #引き算を追加 expression : atom "-…
単純な足し算だけに続いて,引き算もしたいということで,単純に拡張します. use strict; use warnings; use Parse::RecDescent; my $grammar=q( expression : atom "+" expression { $return = $item[1] + $item[3] ;} #引き算を追加 expression : atom "-…