ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Pavel Kurnosoff                      2:5030/736.25  09 Dec 2000  23:39:58
 To : All
 Subject : eval
 -------------------------------------------------------------------------------- 
 

 странные вещи творятся... есть вот такой код:
 #     eval($pp->script);
    eval($pp->script);
    $self->print(eval "\$${pkg}::COMPILED");
 
 где $pp->script возвращет такое:
 
 -------------------------------------------------------------------------
 package ROOT::home::httpd::html::test_2epsp;
 use PSP::Page;
 @ROOT::home::httpd::html::test_2epsp::ISA=qw(PSP::Page);
 $ROOT::home::httpd::html::test_2epsp::COMPILED=976390357;
 
 sub xx {
 ....
 }
 
 1;
 -------------------------------------------------------------------------
 
 дык проблема в том, что реально этот пэкэдж появлется (срабатывает print и
 дальнейшие вещи) только если eval сделать ДВА раза... 
 
 я в непонятках... чего это оно?
 
 -- 
 // pavel kurnosoff 
 --- Gnus v5.6.45/XEmacs 21.1 - "Bryce Canyon"
  * Origin: there's no tomorrow (2:5030/736.25)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор