- RU.PERL ----------------------------------------------------------- RU.PERL -
Msg : #2545 [500]
От : Yury Kopyl 2:5020/400 11 февраля 04, 18:31
Кому : Yury Kopyl 14 февраля 04, 22:52
Тема : Re: Parse::RecDescent
-------------------------------------------------------------------------------
From: "Yury Kopyl"
Yury Kopyl -> "Parse::RecDescent" :
YK> Кто боролся с этой проблемой?
Вообщем решил грязным хаком:
my $grammar=q~rule: token {CLASS::func}~;
my $package_name=__PACKAGE__;
$class_grammar=~s/CLASS\:\:/$package_name\:\:/g;
Yury Kopyl aka hrg | http://id.totem.ru | Гордость мешает доходам!
--- ifmail v.2.15dev5.3
* Origin: IAC Samara-Internet, Ltd. (2:5020/400)