#!/usr/bin/env perl

@exemplars = <DATA>;

foreach $line (@exemplars) {
    @words = split (/\s+/, $line);
    $array[$#words] = $line;
}

@array = sort { $a <=> $b } @array;

$reference = $array[-1];

print "Reference string: $reference";

for (@exemplars) {
    $exemplar = $_;
    s/[.]{3}/.+?/g;
    if ($reference !~ /$_/) {
        print "NO MATCH: $exemplar";
    }
}

__DATA__
Gallia est omnis divisa in partes tres
Gallia est omnis divisa in ...
Gallia est omnis ...
Gallia
... omnis divisa in ...
... in ...
... est ...
Gallia est ... tres
Gallia ... partes tres
Gallia est ... partes tres
Gallia ... divisa ... tres
... tres
quattuor
Gallia ...