ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Paul Kulchenko                       2:5020/400     16 Jun 2000  18:05:50
 To : All
 Subject : Re: Exporter, @EXPORT, @EXPORT_OK...
 -------------------------------------------------------------------------------- 
 

 Hi, Denis!
 Paul Kulchenko wrote in message <3949A14D.5040404@yahoo.com>...
 
 Hу это не Netscape, а непонятно что. Тем более 6й версии.
 
 Вообщем, вопрос свой помнишь, поскольку тут его не видно :). Ответ внизу.
 
 >> no strict 'subs';
 >> no strict 'refs';
 >> my $sub_name = "FUNC";
 >> *$sub_name = \&func;
 >>
 >> FUNC; # (1)
 >> exit;
 >>
 >> sub func {
 >>   ...
 >> }
 >>
 >> (... .... ..... - . ....../...... .......... ......... ..... ...... ..
 >> callback-......., ....... ..... ..... .......; .... .. ........ .
 >> ............ .. . .........., ..... typeglobs ........ ..... . .......
 
 ....)
 
 >> ... ..., "Useless use of a constant in void context at (1)" ... ....... .
 >> -w. .......-.. ......., .. ......-.. ... ........, ... ... strict 'subs'
 >> ..... ...... ..... .................. ... ..... ....... ... ...........
 >> &FUNC ... FUNC() ............ ... ....... ....... ..... .............,
 
 ...
 
 >> FUNC ..... . ........... - .. ... ......., ... ...... FUNC; - ... .......
 
 ?
 
 Для этого нужно ДЕКЛАРИРОВАТЬ функцию ДО ее использования, например:
 sub FUNC;
 
 Если же нужно изменять ее имя динамически, то делай:
 BEGIN { eval "sub FUNC"; }
 
 BEGIN здесь важно, поскольку тебе нужно это выполнить на этапе компиляции
 
 Best wishes, Paul.
 --- ifmail v.2.15dev5
  * Origin: Rostelecom/Internet Centre (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    Re: Exporter, @EXPORT, @EXPORT_OK...   Paul Kulchenko   16 Jun 2000 08:36:00   Re: Exporter, @EXPORT, @EXPORT_OK...   Paul Kulchenko   16 Jun 2000 18:05:50