in reply to Listing Keys in a specific element(s) in an array of hashs

print join ",",keys %{$data[0]};

See perlfunc for docs on the use of keys.

CU
Robartes-