Select Code to Download

@array = (3, 2, 1, "", 2, undef);

@cleanarray = grep { defined $_ && $_ ne "" } @array;
@sortedcleanarray = sort grep { defined $_ && $_ ne "" } @array;