value");
SKIP: {
skip "Scalar::Util not available", 1 unless $scalar_util_ok;
isnt(refaddr($got[0]), refaddr($y),
"'$test' first output arg is not the third input arg"
SKIP: {
skip "Scalar::Util not available", 1 unless $scalar_util_ok;
isnt(refaddr($got[0]), refaddr($y),
"'$test' first output arg is not the second input
: {
skip "Scalar::Util not available", 1 unless $scalar_util_ok;
isnt(refaddr($got[0]), refaddr($m),
"'$test' first output arg is not the second i
value");
SKIP: {
skip "Scalar::Util not available", 1 unless $scalar_util_ok;
isnt(refaddr($got[0]), refaddr($y),
"'$test' first output arg is not the third input arg"
value");
SKIP: {
skip "Scalar::Util not available", 1 unless $scalar_util_ok;
isnt(refaddr($got[0]), refaddr($y),
"'$test' first output arg is not the third input arg"