use Test::Referenced;
 
  is_referenced_ok(
    complex_data(),
    "complex data"
  );
 
  is_referenced_in_file(
    data_structure(),
    "complex data test",
    "data_structure"
  );