test$ grep '#/INT' dirlist.pl -A1 -B3
          my $rule = Path::Iterator::Rule->new;
          if ($id =~ /^([0-9A-F]{2})/) {
            my $int = $1;
            $rule->and( sub { m#/INT $int# } );
          }