my @arr1 = @{$r1};
my @arr2 = @{$r2};