is $@, '', "getdata in thread $tid doesn't croak";
is $d, 5 + $tid, "getdata in thread $tid returns the right thing";
is $c, 1, "getdata in thread $tid doesn't trigger magic";
is $@, '', "getdata in thread $tid doesn't croak";
is $d, 5 + $tid, "getdata in thread $tid returns the right thing";
is $c, 1, "getdata in thread $tid doesn't trigger magic";