Судя по тому что тут пишут всякие непонимающие... Надо развернутый ответ дать... Когда вы делаете:
%h = (q => '1');
qwe(%h)
Вы на самом деле делаете
qwe('q', 1) - это раскрытие параметров. Именно по этому не надо отдавать массивы и хеши как есть в вызов сабы.

Теперь если вы сделаете внтури сабы:
my ($qwe, %rest) = @_ - это работа со списочным контекстом. Вы просите раскрыться @_ в список, потом выбираете из него первый элемент в $qwe, а все остальное - в %rest (И если там будет нечетное количество аргументов - вам ругнутся).  То есть больше одного хеша или массива в списке - бессмысленно.

а в Oracle SQL и Postgres через || !!111111111

Это как же так?

Я ставлю на то, что стандартная функция сортировки это { $a <=> $b || $a cmp $b }

Почему больше одного хеша в списке -- бессмысленно? Не согласен :(
Это стандартный способ задавать дефолтные значения для хеша

Потому что все поймается в первый-же

Я не в контексте :) не читал код по ссылкам

А, я посмотрел код, ну да. В lvalue списке два хеша бессмысленно...

но ведет к отуплению

man perlop

в Ada тоже

опять у кого-то мешок с ботами порвался

Да я даже cheat-shit по ним читал!

Но мне быстрее наугад проверить, чем доки поднимать.

Камон, как это отлаживать вообще…

мои глаза

сууука

Там весь файл такой..