Help for this page
use Sort::Key::Multi 'u3_keysort'; # u3 => 3 unsigned integer keys my @sorted = u3_keysort { /^(\d+)\.(\d+)\.(\d+)$/ } @versions;
use Sort::Key::OID qw(oidsort); my @sorted = oidsort @versions;