ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Michael Samanov                      2:550/5068.1515 26 Jul 2000  16:47:11
 To : sapa@chelindbank.ru
 Subject : Re: Длина стринга
 -------------------------------------------------------------------------------- 
 

 Hello, sapa@chelindbank.ru!
 
 At Mon, 24 Jul 00 21:51:58 +0400 sapa@chelindbank.ru wrote:
 
 scr> Зачем же так сложно, можно одной строкой :-))
 
 scr>
 
 $len=sub{$_[0]->(@_)}->(sub{$_[1]eq""?0:$_[0]->($_[0],substr($_[1],1))+1},$n
 
 scr> ame);
 
 В трезвом состоянии такое и в голову ни за что не придет...
 Колись, брат, много ли употребил перед тем, как сесть за дисплей?
 :-)
 
 Sincerely yours, Michael (mailto:mike@vlink.ru).
 --- ifmail v.2.14
  * Origin: Home (2:550/5068.1515@fidonet)
 
 

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