# 5.8.x
push @files, (map "$dir/$_.pl", qw( Exact Canonical ));