my @data = 
    map   { $_->[1] }
    sort  { $a->[0] <=> $b->[0] } 
    map   { [ substr($_,1), $_ ] } @tempArray;