for (sort (map {version->declare($_)} @unsorted_versions)) {
    push @versions, (sprintf "%s", $_);
}