2つの配列レファレンスを結合する
単なる配列だと普通にやればできるけど、レファレンスの場合はちょっと面倒かな…
use Data::Dumper; my $arr1 = [1..3]; my $arr2 = [(@$arr1,@$arr1)]; print Dumper($arr2); # 1,2,3,1,2,3
単なる配列だと普通にやればできるけど、レファレンスの場合はちょっと面倒かな…
use Data::Dumper; my $arr1 = [1..3]; my $arr2 = [(@$arr1,@$arr1)]; print Dumper($arr2); # 1,2,3,1,2,3