169 похожих чатов

@PerlBanjoBot Use v5.38; sub split_on_cond($arr, $cond) { ($a, $b) = ([],

[]);
push @{ $cond->($_) ? $a : $b }, $_
for @$arr;
($a, $b)
}

use Data::Dumper;
warn Dumper [split_on_cond([1..10], sub($v) {$v > 6})];

10 ответов

11 просмотров

$VAR1 = [ [ 7, 8, 9, 10 ], [ 1, 2, 3, 4, 5, 6 ] ]; https://PerlBanjo.com/c52b4498aa

Sergei-Zhmylove Автор вопроса
PerlBanjoBot
$VAR1 = [ [ 7, 8...

@DRVTiny держи :) Это идеально показывает, как не читая тз можно что-нибудь сделать и в результате получить не то, что хотелось

а теперь покажи лог с гигачатом как ты заставил его написать эту программу

Sergei-Zhmylove Автор вопроса
Anton Petrusevich
а теперь покажи лог с гигачатом как ты заставил ег...

Уже удалил 🤷🏼‍♀️ мне не нравится когда там копися мусор

raku -e '(^10+1).classify(* > 6).say' {False => [1 2 3 4 5 6], True => [7 8 9 10]}

Sergei-Zhmylove Автор вопроса
cono
raku -e '(^10+1).classify(* > 6).say' {False => [1...

К сожалению, автору нужно было не это… ну да ладно :)

Sergei Zhmylove
К сожалению, автору нужно было не это… ну да ладно...

я не вчитывался, реально блин трудно сходу понять что там он нагородил, но, как я понял, ему надо было разбить по условию до первого невыполнения условия

Похожие вопросы

Обсуждают сегодня

30500 за редактор? )
Владимир
47
Недавно Google Project Zero нашёл багу в SQLite с помощью LLM, о чём достаточно было шумно в определённых интернетах, которые сопровождались рассказами, что скоро всех "ибешни...
Alex Sherbakov
5
вы делали что-то подобное и как? может есть либы готовые? увидел картинку нокода, где всё линиями соединено и стало интересно попробовать то же в ddl на lua сделать. решил с ч...
Victor
8
Подскажите пожалуйста, как в CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean); получить наз...
A Z
7
Ребят в СИ можно реализовать ООП?
Николай
33
https://github.com/erlang/otp/blob/OTP-27.1/lib/kernel/src/logger_h_common.erl#L174 https://github.com/erlang/otp/blob/OTP-27.1/lib/kernel/src/logger_olp.erl#L76 15 лет назад...
Maksim Lapshin
20
Как передать управляющий символ в открытую через CreateProcess консоль? Собсна, есть процедура: procedure TRedirectThread.WriteData(Data: OEMString); var Written: Cardinal;...
Serjone
1
Он в одиночку это дело запилил или была какая-то команда?
Aquinary
12
~ 2m21s  nix shell github:nixos/nixpkgs#stack ~  stack ghc -- --version error: … while calling the 'derivationStrict' builtin at /builtin/derivation.nix:...
Rebuild your mind.
6
Всем привет, нужна как никогда, нужна помощь с IO в загрузчике. Пишу в code16 после установки сегментных регистров, пишу вывод символа. Пробовал 2 варианта: # 1 mov $0x0E, %a...
Shadow Akira
14
Карта сайта