if (ref($value)) {
  print $value->Type();
}