Consider using hashes instead of arrays when you are checking for existense or counting something:

my %ciks_hash;
undef @ciks_hash{@ciks}; # this is called "hash slice"
# ... later:
if ($form_type=~/$formget/i && exists $ciks_hash{$cik}) {
 ...
}
[download]

See also: Slices, How can I remove duplicate elements from a list or array?