Select Code to Download

# you can name your arrays a,b,c,d,e if you want to,
# but I won't
...
   push @agencyReferences, $4;
   push @statusDescriptions, $5;
}

# same arrays as above
while(<>) {
...
    # adjust either start or end if you need to skip spaces
    push @statusDescriptions, substr $_,36,64;
}