http://www.perlmonks.org?node_id=1014409


in reply to Re: Detect file sequences in File:Find results
in thread Detect file sequences in File:Find results

Re^3: Collapsing a list of files... (floyd, boundary diff), Collapsing a list of files..., Regexp::List
use Regexp::List; print Regexp::List->new->list2re(qw( image_sequenceA.1.tif image_sequenceA.2.tif image_sequenceA.3.tif image_sequenceB.40.tif image_sequenceB.41.tif image_sequenceB.42.tif )); __END__ (?^:image_sequence(?:A\.[123]\.tif|B\.4[012]\.tif))