Help for this page
Select Code to Download
Select
or
download this
my $index = first{$headers[$_] eq 'Strand'} 0..$#headers;