Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexander Babanov                    2:5061/32      08 Jun 2001  01:49:15
 To : Alexander V. Gaiduk
 Subject : Re: несколько Japh'ов
 -------------------------------------------------------------------------------- 
 
 ЮІ±° Quoted soap from Alexander V. Gaiduk to All
 Юґullo Alexander!
 
  >>  KS> #! /usr/bin/perl
  >>  KS> print ucfirst lc(join('',((split
  >>  KS> file://,join'',map{for((''.localtime(
  >>  KS> $_*2764800))=~/(\w+\s+\w+)/){y/y
  >>  KS> /k/;$;=$_};$;}(0..16))[39,40,28,
  >>  KS> 49,24,19,41,67,30,50,12,15,3,26,
  >>  KS> 12,15,48,17,50,5,68,34,12,20])))
  >> Дает "Jufw anoieeh pehl eecker" ;) Hо идея хорошая.
  AG> неправда.
 
 Хотел бы я знать, что значит "неправда"? :) Я с экрана копировал.
 
  AG> пишет нормально (Win32, ActivePerl)
 >>>
 
 This is perl, v5.6.0 built for MSWin32-x86-multi-thread
 (with 1 registered patch, see perl -V for more detail)
 
 Copyright 1987-2000, Larry Wall
 
 Binary build 623 provided by ActiveState Tool Corp. http://www.ActiveState.com
 Built 16:27:07 Dec 15 2000
 
 >>>
 
 Того же самого jufw-eecker'а выдает PerlMagic, что уже совсем плохо пахнет Ж,)
 
 >>>
 
 This is perl, v5.6.0 built for MSWin32
 
 Copyright 1987-2000, Larry Wall
 
 >>>
 
 CYa!!!
 
 ЪДВїЪДВВВДДДщщъъ ЪДВВВДї ЪїЪДВДДДДДДДДщщъъ   ЪДДДД 2:5020/5609.69 ДДДї
 іВіАґДЕ ґBabanov іВі ґВі іАґВіST BERSERKER   і babanov@earthlink.net і
 ... Еще наше поколение будет жить при Виагре! [предп. из писем Ильича к HКК]
 --- (none)
  * Origin: Our governor can beat up your governor! (2:5061/32.0)
 
 

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

 Тема:    Автор:    Дата:  
 Re: несколько Japh\'ов   Alexander Babanov   08 Jun 2001 01:49:15 
 Re: несколько Japh\'ов   Alexander V. Gaiduk   08 Jun 2001 12:35:34 
Архивное /ru.perl/389254f851cdb.html, оценка 2 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional