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

[818 253 2020/10/30(金) 00:22:38.86 ID:hMjmzAXb]

>>816 Pop関数はこっちの方がいいな、無駄なコピーもないし。

sub Pop($a) {
　my $b = @$a[-1];
　delete @$a[-1];
　$b;
}