my @arr = (['a','b','c'],
           ['h','i','j'],
           ['x','y','z']);

my @first_column = map $_->[0], @arr;