Я только начал изучать галстук . У меня есть класс с именем Link, который я хотел бы сделать следующим образом: если получено, вернуть адрес ссылки если сохранено, сохраните новый адрес иметь возможность вызывать методы на нем Пока что...

Если бы у меня был простой связанный скалярный класс, который увеличивается при каждом чтении, я мог бы сделать это так: package Counter; use strict; use warnings; sub TIESCALAR { my $class = shift; my $value = 0; bless \$value, $class;...

Я пока не могу осмыслить TIE, но примеры ( example- 1 пример-2 example-3 ) Я видно, что до сих пор использовалась реализация, отличная от Moosy, есть ли способ сделать это: package MY_STDOUT; use strict; my $c = 0; my $malformed_header = 0;...

Мне нужно отключить прогрессивную буферизацию ответа HTTP. У меня это работает в Perl, используя класс дескриптора файла: $|=1; $TIE = tie(*STDOUT,__PACKAGE__); Операторы печати хранятся в массиве и извлекаются с помощью следующего:...

Я создаю развлекательную таблицу, чтобы отслеживать свое положение в футбольной лиге. Вот моя проблема....(выделено жирным шрифтом) ДОМА/В гостях ПРОТИВНИК ГОЛ ЗА ГОЛ ПРОТИВ W T L H RED 4 2 1 A...

Как я могу скрыть вызов «связи» от пользователя, чтобы вызов средства доступа неявно делал это за них? Я хочу сделать это, потому что у меня есть структура данных, к которой пользователь может получить доступ, но значения, хранящиеся в этой...

У меня есть хеш, например. $hash->{'foo'}{'bar'} . Я хочу вызвать Carp::cluck в любом месте, где изменилось значение ключа bar . Как это сделать ? Есть ли готовый модуль на CPAN, который может сделать этот трюк?