is($data->{bar}, 40, 'set magic : pass data');
$data = eval { getdata $a, ($sig + 1) };
is($data->{bar}, 40, 'set magic : pass data');
$data = eval { getdata $a, ($sig + 1) };
is($data, undef, 'getdata from invalid sig returns undef');
$data = eval { getdata $a, undef };
is($data, undef, 'getdata from invalid sig returns undef');
$data = eval { getdata $a, undef };