$scalar =~ s/ich will weg|ich auch//; print (reverse sort (split (/:/, $scalar));