プログラミングのお題スレ Part17

[271 デフォルトの名無しさん 2020/04/24(金) 00:06:04.10 ID:B1fvRJ4E]

>>270　Perl5

$s = [1, 2, 3, 4];
$ncol = 2;
push @b, [splice @$s, 0, $ncol] while @$s;
use Data::Dump 'dump';
print dump(\@b,)."\n";


実行結果
~ $ perl 17_270.pl
[[1, 2], [3, 4]]