ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : vitus@ice.ru                         2:5020/400     29 Mar 2000  17:12:08
 To : "Tanya Gournenko"
 Subject : Re: eval
 -------------------------------------------------------------------------------- 
 

 Tanya Gournenko <gurt@pine.ict.nsc.ru> wrote:
 
 TG>поясните, пожайлуста
 TG>почему не срабатывает eval  при  следующем написании
 TG>eval "sub koi2win { local $_ = shift; tr/$koi8r/$cp1251/; $_ }";
 
 Потому что он подставляет текущее содержимое $_.
 Попробуй 
  eval "sub koi2win { local \$_ = shift; tr/$koi8r/$cp1251/; \$_ }";
 
 TG>а страбатывает только в таком
 TG>eval 'sub koi2win { local $_ = shift; tr/'.$koi8r.'/'.$cp1251.'/; $_ }';
 -- 
 --------------------------------------------------
 Victor Wagner      vitus@ice.ru
 Programmer     Office:7-(095)-203-50-60
 Institute for Commerce     Home: 7-(095)-135-46-61
 Engineering                     http://www.ice.ru/~vitus
 --- ifmail v.2.15dev4
  * Origin: Demos online service (2:5020/400)
 
 

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