Flags

      while (<INFILE>) {
        ...
        $chain_test=1  if (/CHAIN_TEST/);

        if (/apply/ && ($chain_test)) {
          ...
        }
      }

Is this Variable use immediately follows assignment?
No, because that applies when the variable is used only once
Here chain_test is checked repeatedly after it is set
- Because it is in a while loop