p5-regexp-optimizer Regexp::Optimizer - optimizes regular expressions SYNOPSIS use Regexp::Optimizer; my $o = Regexp::Optimizer->new->optimize(qr/foobar|fooxar|foozap/); # $re is now qr/foo(?:[bx]ar|zap)/