Описание тега tie
Команда Perl для скрытия класса объекта в простой переменной.
1
ответ
Небезопасно удалять элементы из связанного хеша DB_File при повторении с `each`?
Эта проблема Я использую NetBSD 6.1, Perl v5.18.1 и DB_File v1.818. Если я перебираю хеш, связанный с DB_File, используя each и удалить каждый элемент из хэша, не все элементы будут удалены. Вот скрипт, демонстрирующий проблему: use strict; use warn…
01 май '14 в 21:37
3
ответа
Perl читает только определенные строки файла gz
Я пытаюсь создать скрипт синтаксического анализа, который анализирует огромный текстовый файл (более 2 миллионов строк), сжатый с помощью gunzip. Я только хочу проанализировать диапазон строк в текстовом файле. До сих пор я использовал zgrep -n, что…
06 дек '18 в 00:35
1
ответ
Хеши как ключи в Perl
Я работаю над требованием, в котором ключи хэша являются хэшем. Я наткнулся на cpan modue Tie::RefHash который может выполнять работу, но почему-то он не работает для вложенных хэшей, хотя я использую Tie::RefHash::Nestable, my %hash_arg = (); tie %…
28 окт '15 в 13:21
1
ответ
Почему Win32::TieRegistry не может быть подключом?
Использование Cygwin Perl v5.8.8 и Win32::TieRegistry 0.26. Мы можем получить объект связанного хеш-объекта для HKEY_CURRENT_USER: $ perl -e ' my %RegHash; use Win32::TieRegistry( TiedHash => \%RegHash ); use Data::Dumper; my $Key = $RegHash{"HKE…
24 мар '09 в 15:46
3
ответа
Как посмотреть конкретный хеш-ключ для изменения его значения?
У меня есть хеш, например $hash->{'foo'}{'bar'}, Я хочу позвонить Carp::cluck в любом месте, где стоимость bar Ключ изменился. Как это сделать? Есть ли готовый модуль на CPAN, который может сделать этот трюк?
13 фев '19 в 09:07
1
ответ
"фиксированный" режим связи netlogo не поддерживает длину ссылки в графах со средним уровнем
Я пытаюсь создать сеть, которая движется по среде как "статическая" единица, то есть ничего в симуляции не меняется, кроме положения и ориентации целого, положение и ориентация отдельных черепах относительно друг друга фиксируются их ссылки. Черепах…
21 фев '19 в 18:47
1
ответ
Ошибка восстановления из nstore_fd: невозможно найти метод объекта "FIRSTKEY" через пакет "Hash::Case::Lower"
Я занимаюсь археологией программы с 2005 года. Она с радостью пишет такие резервные копии: use Storable qw(nstore_fd); my %data = ( "Games" => \%Games, "Members" => \%Members, "Scenarios" => \%Scenarios, "Passwords" => \%Passwords, "Tour…
18 июл '18 в 11:20
3
ответа
Обработка связей MYSQL не возвращает правильных результатов
Я работаю с MYSQL и пытаюсь работать в рамках возможностей MYSQL связей для ранжирования. мой запрос: SELECT petz.s_name, petz.breed, a.num, sum(a.rank) AS rank FROM wins_conf a JOIN (SELECT DISTINCT rank FROM wins_conf ORDER BY rank DESC LIMIT 10) …
09 окт '13 в 17:44
2
ответа
Как я могу предотвратить чтение perl после конца связанного массива, который уменьшается при доступе?
Есть ли способ заставить Perl звонить FETCHSIZE в связанном массиве перед каждым вызовом FETCH? Мой связанный массив знает его максимальный размер, но может уменьшиться от этого размера в зависимости от результатов ранее FETCH звонки. Вот надуманный…
21 дек '09 в 20:46
2
ответа
Почему Tie::File добавляет строку, если файл отсортирован?
У меня есть этот маленький Perl-скрипт, который должен сортировать файл: #!/usr/bin/perl use strict; use warnings; use Tie::File; tie my @lines, 'Tie::File', 'fileToBeSorted.txt' or die $!; printf "line count before: %d\n", scalar @lines; @lines= so…
02 апр '13 в 20:51
2
ответа
Использование std::tie в качестве диапазона для цели цикла
Я хочу сделать что-то вроде следующего: //std::vector<std::pair<TypeA, TypeB>> someInitializingFunction(); { TypeA a; TypeB b; for (std::tie(a, b) : someInitializingFunction()) { // do stuff; } } Однако это недопустимый код, потому что, …
23 янв '14 в 05:50
1
ответ
Проверка PHP на равенство в голосовании, переменное количество победителей
Я провел выборы с разным количеством победителей для каждой категории. (В одной категории может быть 3 победителя, другой 1 победитель, еще 2 победителя и т. Д.) В настоящее время я показываю результаты, как это: foreach($newarray as $key => $val…
22 апр '13 в 21:41
2
ответа
Проблема с рейтингом в Excel
Кто-нибудь знает, как бороться с проблемой связующих записей в Excel? Я хочу показать запись только один раз при первом появлении. Если один и тот же номер будет найден дважды, он не будет отображаться, как показано выше.
14 фев '13 в 01:18
4
ответа
Возвращение лениво вычисляемого скаляра в perl
Я пытаюсь добавить некоторые функциональные возможности в нашу кодовую базу, используя связанные скаляры. У нас есть функция, которая указана для возврата скаляров. Я думал, что мог бы добавить некоторые функции в систему, связав эти скаляры перед и…
29 июл '10 в 01:50
3
ответа
Могу ли я перегрузить Perl's? (И проблема при использовании Tie)
Я решил использовать галстук и найти это: package Galaxy::IO::INI; sub new { my $invocant = shift; my $class = ref($invocant) || $invocant; my $self = {']' => []}; # ini section can never be ']' tie %{$self},'INIHash'; return bless $self, $class;…
27 сен '09 в 11:45
1
ответ
Как я могу использовать tie() для перенаправления STDOUT, STDERR только для определенных пакетов?
Мне нужно работать с некоторыми библиотеками, которые, к сожалению, регистрируют диагностические сообщения в STDOUT и STDERR. Используя tieЯ могу перенаправить эти записи в функцию, которая захватывает их. Так как я не хочу, чтобы все выходные данны…
12 июл '12 в 22:41
1
ответ
Почему моя Perl-программа не работает с кодировкой Tie::File и Unicode/UTF-8?
Я работаю над проектом, который работает с данными на иностранных языках. Мои Perl-скрипты работали нормально. Затем я захотел использовать Tie:: File, так как это аккуратная концепция (и экономит время и кодирование). Кажется, что Tie: Файл не рабо…
03 ноя '12 в 13:07
1
ответ
Как сделать кортеж из константных ссылок?
Скажем, есть две функции: void ff( const std::tuple<const int&> ) { } template < typename TT > void gg( const std::tuple<const TT&> ) { } и вызывает эти функции: int xx = 0; ff( std::tie( xx ) ); // passes gg( std::tie( xx …
13 авг '13 в 15:35
2
ответа
Perl автовивификация с TIEHASH
Это ожидаемое и интуитивно понятное поведение связанного хэша $h{a}++: $ perl -E' sub DESTROY {} sub AUTOLOAD { say "$AUTOLOAD @_"; bless {} } tie %h, main; $h{a}++; ' main::TIEHASH main main::FETCH main=HASH(0x7fb6c982a188) a main::STORE main=HASH(…
02 фев '13 в 16:36
1
ответ
Ошибка в использовании Net::Lite::FTP
Я использую библиотеку Perl Net::Lite::FTP для протокола FTP TLS. Я получаю ошибку Damn! undefined response при подключении к пульту. Я думаю, что проблема с Net::SSLeay::Handle, Если я прокомментирую строки 151, 271, 310, 373 в Net/Lite/FTP.pm Библ…
15 июл '15 в 04:53