Re: Perl празднует свой 20-ый день рождения!

Дорогуша, судя по вашим высказываниям, вы ещё под себя ходили, когда Столлман GNU начал... animechaos (*) (18.12.2007 16:37:53)

Я даж думаю что до сиx пор xодит. Из за псиxичeckoй травмы в дeтствe.

и вообще бред он какой-то несет, если мягко сказать.

spider

Re: Perl празднует свой 20-ый день рождения!

Долгой жизни perl. Ларри респект

Re: Perl празднует свой 20-ый день рождения!

да, вспомнилось по поводу краткости языка... может кто читал вавилон-17 С.Диллени? там вспоминался язык, с помощью которого какая-то расса смогла на своем языке описАть девайс с помощью семи (???, или девяти?) коротких слов, по которых на их далекой планете инженеры смогли воссоздать абсолютно точную копию девайса, никогда его прежде не видев (оригинальное описание техпроцесса по созданию девайса на "человеческом" языке занимало несколько тысяч страниц, с чертежами). вот перл мне чем-то напоминает этот язык =) и я почти уверен, что он никогда не будет забыт, т.к. людям, им владеющим, дает возможность выражать свои мысли и желания в максимально короткой и, не побоюсь этого слова, УДОБНОЙ форме ;)

зы: да, я уже отмечаю =)

arsi (18.12.2007 21:14:03)

Re: Perl празднует свой 20-ый день рождения!

Perl -- это разминка для ума даже на уровне синтаксиса. Поэтому его ничто не заменит. Думаю, что на шестом перле для дела не напишу ни строки, но ради удовольствия и умственного развития язык надо будет освоить. Впрочем, одноразовый код на нем должен вообще отлично получаться.

amix (18.12.2007 21:45:05)

Re: Perl отпраздновал бы свой 20-й день рождения!

Он умер таким молодым.

Re: Perl празднует свой 20-ый день рождения!

> там вспоминался язык, с помощью которого какая-то расса смогла на своем языке описАть девайс с помощью семи (???, или девяти?) коротких слов

я всегда подозревал, что Перл - это язык инопланетян :D

> зы: да, я уже отмечаю =)

Заметно. Выпей там за здоровье Райдры Вонг :)

tailgunner (18.12.2007 22:01:06)

Re: Perl празднует свой 20-ый день рождения!

> как там у класиков...
> большинство программ на перле следуют такому стилю форматирования: набирается первые 60-80 символов кода, жмется энтер...
> тады да, мыслей помешается больше)

нет, после каждой точки с запятой перевод строки. Bмещаемость логики per cтрока в перле выше.

szh (18.12.2007 22:49:16)

Re: Perl празднует свой 20-ый день рождения!

> Ruby тебе тогда понравится ещё больше. Это прямой наследник Перла в этом смысле. Там можно писать ещё более сжато :)

Спаcибо, приму к сведенью, если когда-нибудь будет ресурс на изучение...

szh (18.12.2007 22:53:12)

Re: Perl празднует свой 20-ый день рождения!

> Выпей там за здоровье Райдры Вонг :)

выпил. кстати, а кто это? о.О а то по запросу в картинках гугль мне выдал не хилую коллекцию аниме, но это скорее из-за прославленной гугловской системы учёта предыдущих поисков... кстати, спасиба за свежие аниме-картинки ^_^

arsi (18.12.2007 22:53:36)

Re: Perl празднует свой 20-ый день рождения!

>> Выпей там за здоровье Райдры Вонг :)

> выпил. кстати, а кто это? о.О

Главная героиня "Вавилон-17" ;)

tailgunner (18.12.2007 22:56:42)

Re: Perl празднует свой 20-ый день рождения!

Единственное чего не хватает в перл - компиляции в бинарник или около того.

szh (18.12.2007 23:01:40)

Re: Perl празднует свой 20-ый день рождения!

> Главная героиня "Вавилон-17" ;)

**пт, а ведь точно её так звали!!! =) самюеля читал лет пять назад %) красиво пишет, хотя ощущение "что курил аффтар и как он от этого не скончался" не покидает вплоть до прочтения последней строчки... и нескольких лет после ;)

arsi (18.12.2007 23:14:39)

Re: Perl празднует свой 20-ый день рождения!

> Единственное чего не хватает в перл - компиляции в бинарник или около того.

man perlcc

за компиляцию не сойдёт, но за "около того" -- запросто! ;)

arsi (18.12.2007 23:16:49)

Re: Perl празднует свой 20-ый день рождения!

> какая-то расса смогла на своем языке описАть девайс с помощью семи (???, или девяти?) коротких слов, по которых на их далекой планете инженеры смогли воссоздать абсолютно точную копию девайса, никогда его прежде не видев (оригинальное описание техпроцесса по созданию девайса на "человеческом" языке занимало несколько тысяч страниц, с чертежами)

И как это согласуется с теорией информации? :)

ero-sennin (18.12.2007 23:24:16)

Re: Perl празднует свой 20-ый день рождения!

> man perlcc
> за компиляцию не сойдёт, но за "около того" -- запросто! ;)

из man:
The code generated in this way is not guaranteed to work. The whole codegen suite ("perlcc" included) should be considered very experimental. Use for production purposes is strongly discouraged.

Я когда-то что-то пробовал скомпилять, оно не заработало.

Сейчас ничего не компилило пока не приложил патч: https://bugzilla.redhat.com/show_bug.cgi?id=199736

-- ./lib/B/C.pm 2006-01-13 09:47:39.000000000 -0500
+++ /usr/lib/perl5/5.8.8/i386-linux-thread-multi/B/C.pm 2006-07-21
20:25:39.000000000 -0400
@@ -650 +650 @@
- $xpvnvsect->add(sprintf("0, 0, 0, %d, %s", $sv->IVX, $val));
+ $xpvnvsect->add(sprintf("0, 0, 0, %d, %s", $sv->NVX, $val));
---

скомпилялось, но вместо работы ушло в паник.
panic: invalid pad in pad_sv: 0x80db318[0x8122250] at index.idx line 6

szh (18.12.2007 23:46:02)

Re: Perl празднует свой 20-ый день рождения!

>Я даже не буду говорить, что кол-во рабочих мест для перл-программистов в десятки раз превосходит аналогичное для питона и раби

Правильно. Потому что количество рабочих мест для PHP-программистов больше, чем для Перла :)

KRoN73 (19.12.2007 0:39:22)

Re: Perl празднует свой 20-ый день рождения!

>да, вспомнилось по поводу краткости языка... может кто читал вавилон-17 С.Диллени? там вспоминался язык, с помощью которого какая-то расса смогла на своем языке описАть девайс с помощью семи (???, или девяти?) коротких слов, по которых на их далекой планете инженеры смогли воссоздать абсолютно точную копию девайса

http://ru.wikipedia.org/wiki/Ифкуиль

KRoN73 (19.12.2007 0:42:05)

Re: Perl празднует свой 20-ый день рождения!

> http://ru.wikipedia.org/wiki/Ифкуиль

У вас опечатки в слове "Нефкурил".

yk4ever (19.12.2007 1:57:50)

Re: Perl празднует свой 20-ый день рождения!

А я так думаю, что перловка должна умереть. Всё, что пишется на перле - лучше делать либо на баше, либо на питоне. Чем меньше в мире перлового кода - тем меньше зла.

Аминь.

[бросает горсть земли на могилу]

yk4ever (19.12.2007 1:58:57)

Re: Perl празднует свой 20-ый день рождения!

Зато теперь, когда все остальные языки программирования перешли на регулярные выражения Perl 5, Ларри полностью поменял их синтаксис в Perl 6. Ну, надо же кому-то прогрессом управлять, а кому-то догонять. :)

mihalych (19.12.2007 1:59:26)

Re: Perl празднует свой 20-ый день рождения!

>Perl -- это разминка для ума даже на уровне синтаксиса. Поэтому его >ничто не заменит. Думаю, что на шестом перле для дела не напишу ни >строки, но ради удовольствия и умственного развития язык надо будет >освоить. Впрочем, одноразовый код на нем должен вообще отлично >получаться.

+1 ps. С Днём Рождения!!! чувак Perl

Re: Perl празднует свой 20-ый день рождения!

> а почему такая большая?

> perl -e '@_=("0".."9","A".."Z","a".."z",split"","_#\@!\$%^&*()-+=|?<>,.");srand(time^$$ );print@_[map{rand(@_)}1..16],"\n"'

Так у тебя тоже далеко не минимальная. :) Вызов srand вовсе не нужен, он и так вызывается при первом rand (подробности в "perldoc -f srand"). Да и некоторые скобки и кавычки можно сделать более читабельными. В общей сложности три десятка символов можно съекономить при увеличенной читаемости. Хотя всё же надо пробелы проставлять, а то это не дело, когда в программе ни единого пробела нет. :)

perl -le '@_=0..9,"A".."Z","a".."z",split//,q{_#@!$%^&*()-+=|?<>,.};print@_[map{rand@_}1 ..16]'

mihalych (19.12.2007 2:18:17)

Re: Perl празднует свой 20-ый день рождения!

"Snow falling on Perl code.
White noise covering line noise" (c)

tailgunner (19.12.2007 2:25:12)

Re: Perl празднует свой 20-ый день рождения!

Рожденный ползать — летать не может!..

Не понять питонистам, что Перл это свобода плюс оптимальность. :)

mihalych (19.12.2007 2:51:40)

Re: Perl празднует свой 20-ый день рождения!

> Чем меньше в мире перлового кода - тем меньше зла.

Зло это когда человек, не зная языка. злобно злорадствует над ним. А Перл это добро.

Re: Perl празднует свой 20-ый день рождения!

> Рожденный ползать — летать не может!..

Точно. Еще добавлю - горбатого могила исправит.

tailgunner (19.12.2007 2:58:48)

Re: Perl празднует свой 20-ый день рождения!

>4.2 - Читать чужой код всегда сложнее.
>Что не понятно в этой маленькой утилите?
>#!/usr/bin/perl -w
>
>#init alphabet
>@ABC = (
>		'0'..'9', 
>		'A'..'Z',
>		'a'..'z',
>		'_','#','@','!','$','%','^','&',
>		'*','(',')','-','+','=','|','?',
>		'<','>',',','.'
>	);
>
>#init random function
>srand(time ^ $$);
> ... И так далее
Очень плохой способ генерировать пароли, не вздумайте применять
в жизни :) надо использовать /dev/random, даже из головы придуманный
и то лучше

Re: Perl празднует свой 20-ый день рождения!

> Рожденный ползать — летать не может!..

Если уж о животных заговорили, то в отличии от ползучих, Перл не только бегать, но и летать сможет. Perl 5.12 (не говоря уже о Perl 6) возможно над Парротом будет. Ух, полетаем. :-)

Re: Perl празднует свой 20-ый день рождения!

Помните тот флейм из 2003 на ~500 комментов. Кажется он здесь уже упоминался: http://www.linux.org.ru/view-message.jsp?msgid=392747. Там был "rm -rf /" закодированный в виде одной строчки на Perl. (Кто не видел не запускать ни в коем случае) Я долго долго думал. Целых 3 года. И наконец понял кто же был главным злодеем в этой истории. Это же Perl, вместе с его создателем Larry Wall`ом. Он же наверняка знал на какие опасные вещи способно его творение, и все-таки создал его :)

Re: Perl празднует свой 20-ый день рождения!

> Perl 5.12 (не говоря уже о Perl 6) возможно над Парротом будет. Ух, полетаем. :-)

Детишки, очнитесь. Ввод промежуточной виртуальной машины работу только замедлит.

yk4ever (19.12.2007 7:08:39)

Re: Perl празднует свой 20-ый день рождения!

> Зло это когда человек, не зная языка. злобно злорадствует над ним.

Чтобы "знать" перл, надо его выучить. Нафиг в это говно вляпываться?

yk4ever (19.12.2007 7:09:42)

Re: Perl празднует свой 20-ый день рождения!

Дятел какая промежуточная виртуальная машина? байт код даже в твоем сраном пистоне есть. И все примерно одинаково выглядит.

Re: Perl празднует свой 20-ый день рождения!

>Если уж о животных заговорили, то в отличии от ползучих,
>Перл не только бегать, но и летать сможет. Perl 5.12
>(не говоря уже о Perl 6) возможно над Парротом будет.
>Ух, полетаем. :-)

А - ну да, как же :)

- IT?!?!?!?!? Какого Х?!?!?!
- Да у нас тут эта ... сервера ... полетееееели

Re: Perl празднует свой 20-ый день рождения!

>> perl -e '@_=("0".."9","A".."Z","a".."z",split"","_#\@!\$%^&*()-+=|?<>,.");srand(time^$$ );print@_[map{rand(@_)}1..16],"\n"'

> perl -le '@_=0..9,"A".."Z","a".."z",split//,q{_#@!$%^&*()-+=|?<>,.};print@_[map{rand@_}1 ..16]'

по поводу скобок: надеюсь, вы всё же пробовали запускать свой код, и должны были заметить, что в генерируемой строке _нет_ альфанумерики ;) скобки всё же придется оставить:

perl -le '@_=(0..9,"A".."Z","a".."z",split//,q{_#@!$%^&*()-+=|?<>,.});print@_[map{rand@_ }1 ..16]'

а вот опция -l и числовой диапазон без кавычек -- это да, это хорошо =)

arsi (19.12.2007 9:48:41)

Re: Perl празднует свой 20-ый день рождения!

Тото он в Gentoo по последним портежам вообще не собирается

Re: Perl празднует свой 20-ый день рождения!

Да здравствует Perl!!!

Это совершенно замечательный язык программирования, где многие продуктивные идеи были впервые проверены на практике, а затем перекочевали в другие языки программирования (Python, PHP, Ruby, ...). Так что детей и внуков Perl тоже с днём рождения!

А кроме того, под влиянием такого уникального и необычного языка, как Perl, изменилось всё сообщество программистов и их культура в плане учёта психологии Программиста и культивирования Мастерства в нашей професии. Это длительное и благотворное влияние, учитывая даже недостатки самого языка, которые вскоре будут преодолены в Perl6.

mshock (19.12.2007 9:56:07)

Re: Perl празднует свой 20-ый день рождения!

>perl -le '@_=(0..9,"A".."Z","a".."z",split//,q{_#@!$%^&*()-+=|?<>,.});print@_[map{rand@_ }1 ..16]'

perl -le '@_=map{chr}(48..122);print@_[map {rand@_ }1 ..16]'

borisych (19.12.2007 11:37:27)

Re: Perl празднует свой 20-ый день рождения!

Long Live Perl

Re: Perl празднует свой 20-ый день рождения!

>Чтобы "знать" перл, надо его выучить.

А раз ты ни асилил, иди газифицировать лужи в более другой топег

anonizmus (19.12.2007 12:40:34)

Re: Perl празднует свой 20-ый день рождения!

> замечательный язык программирования, где многие продуктивные идеи были впервые проверены на практике

А можно Топ5 этих идей?

tailgunner (19.12.2007 13:12:23)

Re: Perl празднует свой 20-ый день рождения!

> А раз ты ни асилил,

Чтобы "асилить", нужно захотеть. А зачем? Мне он не нужен - есть куда более удобные и эффективные средства. Чужой код на нём тоже поддерживать не приходится - вот не попадается мне перловых приложений совсем, видать не пишет их никто...

А вот общее представление о языке у меня достаточно хорошее, чтобы составить определённое мнение.

> иди газифицировать лужи в более другой топег

Это топик про перл. Я тут всем любителям перла напоминаю, что он говно. По-моему, всё совершенно правильно.

yk4ever (19.12.2007 13:37:37)

Re: Perl празднует свой 20-ый день рождения!

> perl -le '@_=map{chr}(48..122);print@_[map {rand@_ }1 ..16]'

perl -e 'print chr 48 + rand 74 for 1..16'; echo

perl -le 'print map{chr 48+rand 74}1..16'

кто предложит меньше? ;)

arsi (19.12.2007 13:50:06)

Re: Perl празднует свой 20-ый день рождения!

Я дошёл до такого же решения, но опоздал на 10 минут, посему стер как дубль. :) Только коды символов лучше от 32 до 126 гонять.

mihalych (19.12.2007 14:10:19)

Re: Perl празднует свой 20-ый день рождения!

Модераторы выкиньте его нафиг из этого топика. Троль просто невменяем.

Re: Perl празднует свой 20-ый день рождения!

>кто предложит меньше? ;)

С произвольным количеством символов, только генератор случайных символов небезопасный и сильно проигрывающий по быстродействию :))) -

perl -e "print ($pwd=<>);"

necromant (19.12.2007 17:36:07)

Re: Perl празднует свой 20-ый день рождения!

> perl -e "print ($pwd=<>);"

perl -ne "print;exit"

или

head -n 1

^_^

arsi (19.12.2007 20:26:19)

Re: Perl празднует свой 20-ый день рождения!

> Модераторы выкиньте его нафиг из этого топика. Троль просто невменяем.

Моя правда режет ваши красные глаза.

yk4ever (19.12.2007 20:45:32)

Re: Perl празднует свой 20-ый день рождения!

> Я тут всем любителям перла напоминаю, что он говно.

извините, но с вами разговаривать о перле -- то же, что разговаривать с геем о женщинах... и общее представление вроде есть, вот только не хочется, не нада, не приходится...

arsi (19.12.2007 21:01:29)

Re: Perl празднует свой 20-ый день рождения!

>Моя правда режет ваши красные глаза.

Тролль, выколи себе глаза и правда, о том что perl - великолепный инструмент, не будет тебе их резать.

animechaos (19.12.2007 21:28:14)

Re: Perl празднует свой 20-ый день рождения!

> perl - великолепный инструмент,

Для чего? Для обфускации кода?

yk4ever (19.12.2007 21:39:56)