Недавно обнаружил, что если зайти на страницу https://szfsg.megafon.ru/ps/scc/mobile/ с мобильного устройства через мобильный интернет Мегафона, то имеется возможность попасть в «Мегафон Сервис-Гид Северо-Запад» без пароля (для других регионов, возможно, существует аналогичная ссылка).

Test::Spec (https://metacpan.org/pod/Test::Spec) — модуль для декларативного написания юнит-тестов на Perl. Мы в REG.RU активно его используем, поэтому хочу рассказать, зачем он нужен, чем отличается от других модулей для тестирования, указать на его преимущества, недостатки и особенности реализации.

Эта статья не является вводной ни в юнит-тестирование в целом, ни в использование Test::Spec в частности. Информацию по работе с Test::Spec можно получить из документации (https://metacpan.org/pod/Test::Spec и https://metacpan.org/pod/Test::Spec::Mocks). В статье же речь пойдёт о специфике и нюансах этого модуля.

Недавно выяснилось, что по новым правилам PayPal в России, пожертвования (с помощью кнопки «Donate») принимать нельзя.

Вот сообщение саппорта Paypal:

На данный момент открыть счет PayPal
в России для получения пожертвований невозможно в связи с различными правилами финансирования

Распространённое заблуждение состоит в том, что строки символов, в отличие от строк байтов, имеют UTF-8 флаг установленным.
Многие догадываются, что если данные являются ASCII-7-bit, то UTF-8 флаг просто не важен.

Однако, на самом деле, он может быть установлен или сброшен, как и у символов, так и абсолютно произвольных бинарных данных.

Посмотрим на код:

use strict;
use warnings;

sub mysub($$)
{
    my ($a, $b) = @_;
    print "$a\n";
    print "$b\n";
}
my $x = undef;
mysub($x && $x->[0] =~ /abc/, $x = []);

Может ли mysub в качестве первого аргумента получить нечто, что в boolean контексте является истиной?

Сегодня получил email, что vWorker куплен биржей freelancer.com. Пруф этому есть на самом сайте www.vworker.com

Все аккаунты, сделки, отзывы деньги будут переведены на новую платформу freelancer.com

Старые правила и способы вывода денег больше не действительны.

Не повезло тем кто ждал сегодня вывод денег через Wester Union — новая биржа его пока не поддерживает. Так же все привлечённые аффилиаты не действительны.

UPD:

При выводе денег в данный момент показывается что платёж будет только 10 декабря (по крайней мере у меня и у ещё одного пользователя). Однако саппорт разъяснил что такой задержки не будет и как знак уважения всем vWorker пользователям вывод денег будет в ближайший batch (когда точно он — не знаю, но они 2 раза в неделю, 8 раз в месяц).

Amazon Glacier

Вкратце — Amazon Glacier — это сервис с очень привлекательной ценой сторейджа, созданный для хранения архивов/бэкапов. Но процесс восстановления архивов довольно сложный и/или дорогой. Впрочем, сервис вполне пригоден для secondary backup.
Подробнее про Glacier уже писали на хабре.

О чём пост

Хочу поделиться Open Source клиентом на Perl для синхронизации локальной директории с сервисом Glacier, также расказать о некоторых ньюансах работы с glacier и описать workflow его работы.