Perl：新しい配列全体を作成せずに配列をスライスします。

Question

大きな配列への参照があり、いくつかの要素（インデックスから末尾まで）は新しい行をDBに挿入する必要があります。

もっと大きな配列の一部への参照を作成できますか？ あるいは、DBIのexecute_array関数を使って配列の一部を使用することもできます。バックグラウンドでデータのPerlコピーをロードする必要はありませんか？

は、ここで私はより効率的に何をしたいです：Perlで

$sh->execute_array({}, [ @{$arrayref}[@indexes] ]); 

Answer 1

$sh->execute_array({}, [ @{$arrayref}[@indexes] ]); 

は

sub new_array { my @a = @_; \@a } 
$sh->execute_array({}, new_array(@{$arrayref}[@indexes])); 

注コピースライスのすべての要素を割り当てと同様です。私たちは、次のようにスカラーのコピーを避けることができます。

sub array_of_aliases { \@_ } 
$sh->execute_array({}, array_of_aliases(@{$arrayref}[@indexes])); 

今、私たちは全体の代わりにスカラー（およびその中の任意の文字列）のポインタ（SV*）をコピーしています。

Answer 2

パラメータの受け渡しは、「参照渡し」としてスタートします。値のコピーが作成されているかどうかを知りたい場合は、ソースコードを参照してください。

この場合、execute_arrayの2行目の定義では、@_で参照される値が@array_of_arraysという名前のレキシカルにコピーされます。

明るい側は浅いコピーです。 （少なくとも私の知る限り見てきたよう）

Answer 3

アレイスライスが複数の値を返すと@印章を持っている：

my @array = (1, 2, 3, 4); 

print join " ", @array[1..2]; # "2 3" 

my $aref = [1, 2, 3, 4]; 

print join " ", @{$aref}[1..3]; # "2 3 4" 

スライスは、スカラーのリスト（！=配列）を返します。ただし、これ自体はコピーではありません。

my @array = (1, 2, 3, 4); 

for (@array[1..2]) { 
    s/\d/_/; # change the element of the array slice 
} 

print "@array"; # "1 _ _ 4" 

これは非常に効率的です。

新しい配列（または配列参照）を作成する場合は、値をコピーする必要があります。

my @array = (1, 2, 3, 4); 

my @slice = @array[1..2]; 

my $slice = [ @array[1..2] ]; 

構文\@array[1..2]は、スライス内の各要素への参照のリストを返しますが、参照ではない〜スライス。