while (){ #FILE=filehandle chomp; (@last, @first, @age, @sex, @height, @weight, @Comment) = split (/\,/); }