my @headings = splice @{[
	split ' ', (grep /^\s*AUID/, @lines)[0] ]}, 1;