use Test::More qw/no_plan/; use Data::FormValidator; my %h = ( key => [ ' value1 ', ' value2 ' ] ); # Testing an internal function here, so it's OK if this test starts # to fail because the API changes my %out = Data::FormValidator::Results::_get_input_as_hash({},\%h); isnt($h{key},$out{key},"after copying structure, values should have different memory addresses"); { Data::FormValidator->check( \%h, { required => [ 'key' ], filters => [ 'trim' ], }); is($h{key}[0], ' value1 ', "filters shouldn't modify data in arrayrefs"); }