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