my @john = (47, 'brown', 186);
my @mary = (23, 'hazel', 128);
my @bill = (35, 'blue', 157);

my @vitals = qw(john mary bill);

print "@{$vitals[0]}";