use strict;
use warnings;
-use Test::More tests => 28;
+use Test::More tests => 29;
use Test::NoWarnings;
use Data::Dump 'pp';
[ -qqq => '(?:(?![q-z])|q(?![q-z])|qq(?![q-z])|qqq)'],
[ 'q-' => '[q-z]'],
['qqq-' => '(?:[r-z]|q[r-z]|qq[q-z])'],
+ ['zzz-' => 'zz[z-z]'],
[ 'q-x' => '[q-x]'],
[ 'q-q' => 'q'],
[ 'qq-qq' => 'qq'],