#!/usr/local/bin/perl -w
use strict;
use Sort::Versions;

my @old = ("99B","99","99A","100A","100","101","88");

print "$_\n" for sort { versioncmp($a,$b) } @old;
[download]

88
99
99A
99B
100
100A
101
[download]

PerlMonks lovingly hand-crafted by Tim Vroom.
PerlMonks was recently assimilated by The Perl Foundation.
Marvelous Managed Hosting and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.