| Subject: | list2re with modifier x set produces bad code to set modifier |
Try the example for the x modifer from the POD
use Regexp::List;
my $l = Regexp::List->new;
@list = qw/Perl perl BASIC basic/;
print $l->set(modifiers => 'x')->list2re(@list);
Output is
(?=x:(?=[BPbp])(?:[Pp]erl |
BASIC |
basic))
Which doesn't work. It should be
(?x:(?=[BPbp])(?:[Pp]erl |
BASIC |
basic))
Tested under perl 5.8.8 on Mac OS 10.5.1 (Intel)