Subject: | Unexpected exclude behavior |
I would expect the following script to pass:
#!/usr/bin/perl
use strict;
use Test::More 'no_plan';
use Algorithm::IncludeExclude;
my $aie = Algorithm::IncludeExclude->new;
$aie->include;
$aie->exclude('foo', 'bar');
is $aie->evaluate('foo'), 1;
__END__
But it doesn't.
Regards,
Slaven