my (@commands,@matches,$ip);
            for (my $i=0; $i < @temp; $i++){ #process each subset
                if ($i == 0){
                    my @temp1 = split(/:/, $temp[0]); #this is the first subset, it contains the IP
                    $ip = $temp1[0];
                    $count++;
                    $temp[0] =~ s/^(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-5]|2[0-4
+][0-9]|[01]?[0-9][0-9]?)://; #remove IP from subset
                }
                my @arr;
                
                if ($temp[$i] =~ /\=/ ){ #this subset contains pattern-matching instructions
                    my @temp2 = split(/\=/, $temp[$i]); #split subset into further subsets, first co
+ntaining the command, the rest are patterns
                    $temp2[0] = substitute_placeholders($temp2[0],\@metachars,\@translations); #all 
+splitting is done on this string, revert it back to its original form
                    $commands[$i] = $temp2[0]; #this is the command
                    
                    for (my $c=1; $c < @temp2; $c++){ #these are all the patterns
                        $temp2[$c] = substitute_placeholders($temp2[$c],\@metachars,\@translations);
+ ##undo prior substitutions
                        $arr[$c] = $temp2[$c];
                    }
                    $matches[$i] = \@arr;
                }else{ #this subset does not contain pattern matching instructions
                    
                    $temp[$i] = substitute_placeholders($temp[$i],\@metachars,\@translations); ##und
+o prior substitutions
                    $commands[$i] = $temp[$i];
                    $arr[$i] = "no-match-hook"; ##set flag for easy identification later on in the s
+cript
                    $matches[$i] = \@arr;
                }

            }
            $$DATA{$ip}->{commands} = \@commands;
            $$DATA{$ip}->{matches} = \@matches;