yorool_gui: (Default)
Michael Ilyin ([personal profile] yorool_gui) wrote2005-03-14 05:10 pm

о Perl

Перл замечательный язык, когда на нем пишу Я. Когда на нем пишут другие -- это кошмар. И подозреваю, что это взаимно.

use strict;
...
no strict 'refs';
...
$self->{LABELS}->{$title} = $3;
$self->{LABELS}->{$title}->{NUM} = $num++;

Это работатет. Но я не понимаю, ради чего надо так извращаться. Это не тот Перл, на котором пишу я. На моем Перле ref $self->{LABELS}->{$title} будет либо SCALAR, либо HASH, но никак не то и другое одновременно. А вот на Перле этого человека в $self->{LABELS}->{$title} хранятся сразу два значения и ему это удобно. Но это другой язык.

[identity profile] sorhed.livejournal.com 2005-03-14 02:56 pm (UTC)(link)
Ну, кстати, вы же не будете утверждать, что $hashref->{some_key} — это однозначное зло? :) Мне всегда было лень писать $hashref->{'some_key'}, тем более, и strict смотрит на это сквозь пальцы.

[identity profile] blacklion.livejournal.com 2005-03-14 02:59 pm (UTC)(link)
Однозначного зла вовсе нет :)

Да, это минорное зло. Я уже привык в чужом коде. Но сам не ленюсь :)