@PerlBanjoBot $ perl -E 'exec "rm -rf"'

<no output>
https://PerlBanjo.com/8b7cea2c64

Эх

=)

Здравствуйте, swig кто использовал? Есть задача пробросить методы из плюсовой библиотеки. int, char мапятся хорошо. А вот класс бы string как пробросить

Попробуйте xs::framework

Спасибо

тут разрабы в чате, помогут, если что. Сложный пример, того, чего можно - см. Geo::Geos

Большое спасибо. Мне в итоге нужен будет программист для сдельной работы.

У нас api для мобилок на перле

Добрый день, коллеги!

Не подскажет ли кто, как сделать лучше с точки зрения производительности. Есть функция, в которую приходит ref на здоровый хеш с кучей полей (условно, запись из базы). Этот хеш требуется сериализовать в файл, убрав при этом все поля, содержащие в качестве значения undef. Естественно, аргумент модифицировать нежелательно. Какие поля не определены — неизвестно, но их много.

Напрашивается два решения:
1) скопировать структуру целиком:
my %newdata = %{$data_ref};
И дальше внутри %newdata найти и поудалять всё ненужное. И сериализовать уже её.

2) попытаться локализовать данные $data_ref. Для одного известно какого поля это легко:
local ($data_ref->{some_key});
delete $data_ref->{some_key};
Это по логике должно быть эффективнее (нет копирования). Но что-то я никак не соображу, как сделать локализацию для заранее неизвестного списка полей. Всё время local оказывается не в той зоне видимости...

Возможно, есть другие варианты. И есть ли смысл в этих играх для повышения производительности? Что посоветует уважаемое сообщество?

> И есть ли смысл в этих играх для повышения производительности?

Мое предположение что смысла в этом нет. База и работа с файлами гораздо более затратное чем вот это все.

Но точно можно ответить только с помощью профилирования кода — https://metacpan.org/pod/Devel::NYTProf

Наверное не совсем точно сформулировал. Нет вопроса в том, что база и файл — вещи затратные: их зато можно не ждать. Вопрос в том, как подобную зачистку реализовать максимально быстро.
За идею про профилирование — благодарю. Попробую, если осилю локализацию. :)

Не исключено что работа с базой будет будет 70 процентов времени работы скрипта, работа с файлами еще 30%, а вот убирание undef будет 0.004% — и тратить время на эту оптимизацию конечно интересно, но практической пользы это не принесет

while(my($key, $value) = each %$hash) {
   next unless defined $value;
   write_to_file($key, $value);
}

Быстрее только на XS (вернее если ключей меньше миллиона, то быстрее все-таки через foreach my $key (keys %$hash), но не суть)

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

А вот этого в задании небыло

Там же вложенный хеш, так что это уже рекурсия

dumpme($value) if ref $value eq 'HASH';

Но и этого не говорилось