while (my $line=<$txtfile>)
            {
                foreach (@InputData_Unions)

##</code><code>##

if ($line =~/Sarnia Police Association|Sarnia Professional Fire Fighters|.../) { # ...

##</code><code>##

            while (my $line = <$txtfile>)
            {
                next unless $line =~/Sarnia/;
                foreach (@InputData_Unions) { # ...