>>398
>それだと2番目の配列の要素がパラメータスタックにどかっと積まれてすごくイヤじゃないか?
>両方リファレンスにすべきだと思われ。

全面的に同意。

リストを渡せると便利かな程度の考えだったんだけども、言われてみれば確かにコピーすんのはアホっぽいね。
というわけで再々修正版。

sub arraycmp (\@@) {
    my $arref = shift;
    return 0 if @$arref != @_;
    foreach ( 0 .. @$arref - 1 ) {
        defined $_[$_] ? return 0 : next unless defined $arref->[$_];
        return 0 if $arref->[$_] ne $_[$_];
    }
    1;
}

# ほとんど自分用のメモと化してる…。みんなごめんよ。