Помогите расширить, углубить, дополнить

Ты совершенно не понимаешь сути Perl. В Perl нет числового или строкового значения. В Perl есть скаляры. У которых есть скалярные значения. Скалярное значение может отображаться в двух контекстах - числовом и строковом. Можешь представить себе это как класс Scalar, у которого есть два метода-геттера - toNumber и toString. Если для данного скаляра toNumber возвращает 1.1, toString может возвращать "1.1", "Одна целая одна десятая", "адын точка адын". По умолчанию он возвращает "1.1", но это можно изменить, если таково желание программиста.

Xellos (13.12.2011 21:20:20)

Об этом автор пишет в заключении:

SOmni (13.12.2011 21:59:01)

Никто не скрежещит. Это у питонистов сезонное обострение.

Ну прямо срыв покровов. Вот как можно серьезно воспринимать автора, пишущего такую чушь?

Vovka-Korovka (13.12.2011 22:31:31)

> Ты совершенно не понимаешь сути Perl. В Perl нет числового или строкового значения. В Perl есть скаляры. У которых есть скалярные значения. Скалярное значение может отображаться в двух контекстах - числовом и строковом. Можешь представить себе это как класс Scalar, у которого есть два метода-геттера - toNumber и toString. Если для данного скаляра toNumber возвращает 1.1, toString может возвращать "1.1", "Одна целая одна десятая", "адын точка адын". По умолчанию он возвращает "1.1", но это можно изменить, если таково желание программиста.

Справедливости ради стоит упомянуть про случай со "строкой", состоящей из нуля

use strict;
use warnings;

my $var = "0";
if($var)
{
	print "ok\n";
}
else
{
	print "penis\n";
}

Натыкался неоднократно на баги в продакшне, связанные с этим. Например, при парсинге текста, если его разбивать на слова, то есть неплохие шансы потерять часть текста в случаях вроде:

"I have 0 bucks"

DELIRIUM (13.12.2011 22:35:15)

Толсто и глупо.

А что хотели сделать при помощи проверки

if($var)

?

Vovka-Korovka (13.12.2011 22:45:24)

Это очень хорошо. У думаю просто о числе, а не о том как оно представлено в памяти. Если мне важно представление я пишу на Си или ассемблере.

Ты так говоришь, как будто это что-то хорошее. Эта суть хороша ровно до тех пор, пока перловка живет в своем мирке. Когда надо с кем-либо еще взаимодействовать, начинается треш и адов угар.

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

shimon (13.12.2011 23:04:16)

JSON.pm упирается в архитектурные грабли перла. По-другому он не может работать, это бы пришлось городить свою систему типов. Кстати, альтернатив JSON.pm как-то нет и не предвидится.

shimon (13.12.2011 23:06:06)

Ну это я к тому, что надо помнить, что

if('') { print "1 true\n"; }
if("") { print "2 true\n"; }
if("0") { print "3 true\n"; }
if(0) { print "4 true\n"; }
if("1") { print "5 true\n"; }
if(1) { print "6 true\n"; }
if("00") { print "7 true\n"; } #Holy shit!!
my $var = "00";
my $var2 = $var + 1;
print "$var2\n";

выведет true в 5,6 и 7м(!) случаях, но 7й случай в числовом контексте эквивалентен нулю. Это во всех учебниках рассказывается, но не все об этом помнят, например, выходцы из других языков, которым потребовалось что-то написать/поправить на перле.

DELIRIUM (13.12.2011 23:10:41)

тогда уж запили статью - "почему перл рулит". Ибо в некоторых областях (почтовики, спам) он всётаки рулит.

visual (13.12.2011 23:13:07)

Простое везение в том, что SpamAssassin на нем написан. Был бы он на питоне, на почтовиках питон бы и рулил.

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

Прозрачно намекаю, что можно было бы закрыть на это глаза, если бы не факт, что в перле регулярки — это святое, и в это святое нужно втыкать костыли.

shimon (13.12.2011 23:17:05)

Мне вот одно не понятно. Если не нравится язык - ну не используй его. Зачем тратить столько времени на его дискредитацию? Это время явно можно потратить на что-то полезное, чем выливание ушата грязи с непонятной целью. Уж тем болл зачем-то писать статью.

roy (13.12.2011 23:37:14)

Каждый делает эмоциональную разрядку так, как ему нравится.

А вдруг кому-то удастся меня убедить, что перл белый и пушистый, и только недостаток перлового софта в мире мешает воцариться миру и демократии?

shimon (14.12.2011 2:00:05)

А такой костыль нужен конкретно для перла или для целого класса скриптовых языков?

Xenesz (14.12.2011 7:40:33)

Зачем кого-то в чём-то убеждать, тем более в том, какой ЯП использовать? Нравится - используй, не нравится - не используй. Если это твой личный проект - выбираешь сам. Если работаешь в команде - выбирает тимлид, опять же, если ты тимлид - выбираешь сам. Если нет - есть стимул им стать, чтобы выбирать самому. Если же приходится поддерживать проект - то доводами, приведёнными в статье, вряд ли кого удастся убедить его переписать. Тут скорее будут руководствоваться стоимостью поддержки.

roy (14.12.2011 10:14:37)

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

Xellos (14.12.2011 10:43:17)

Не стоит. Потому что этот случай не имеет ни малейшего отношения к числовому и строковому контексту. Это булевый контекст, и он имеет свои правила.

Xellos (14.12.2011 10:44:28)