print join ', ', map $_->{name}, @$test_data;