perl -MRegexp::List -le'print Regexp::List->new->list2re(0..100)'