Changeset 56

Show
Ignore:
Timestamp:
11/30/06 03:54:15 (2 years ago)
Author:
kindlund
Message:

debugging

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • honeyclient/branches/bug/42/lib/HoneyClient/Agent/Integrity.pm

    r55 r56  
    15101510    my $enclosing_key = _find_enclosing_key($self, $start_line, $case); 
    15111511 
     1512    print "Searching for excludes matching: $enclosing_key\n"; 
    15121513    foreach my $exclude_key (@{$self->{reg_exclude_array}}){ 
    1513       print "trying to match $enclosing_key against exclude key $exclude_key\n"; 
     1514###       print "trying to match $enclosing_key against exclude key $exclude_key\n"; 
    15141515        if($enclosing_key =~ /$exclude_key/){ 
    15151516            print "SUCCESS! I'm outta here!\n"; 
     1517            print "Exclude: $exclude_key\n"; 
    15161518            return $start_line; 
    15171519        }